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PREFACE 



There has been a growing demand for a book that will give detailed 
information required to make effective use of the PLUS 4 and the 
C-16. This book originally published in Germany has enjoyed a huge 
success and excellent reviews. ANCO took an early decision to give 
these computers our whole hearted support. Towards this objective, we 
decided to get this book translated and publish it. We hope that you 
will make good use of mine of information available in this book. 



ANCO 
August 1986. 
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1. INTRODUCTION 

In 1984 Commodore introduced two computer models the C-16 and the 
Plus 4, which inspite of excellent performance remain in the shadow 
of the bestseller C-64. In this book, we would like to show you that 
these models are grossly underestimated, because they offer among 
other things an extremely efficient BASIC (much better than that of 
the C-64), excellent graphic possibilities (320 x 200 points in 121 
colours), expansion facilities and an ever increasing software base 
at very reasonable prices. 

The main points in this book are subjects which are insufficiently or 
not at all dealt with in the manual supplied with the computers. It 
is, therefore, for all those people who want to broaden their 
knowledge of BASIC and by using the machine code want to make use of 
all the possibilities of the C-16, specially with regard to graphics 
and sound. 

To make things easier, I will only talk about the C-16 in this book 
since the Plus/4 is identical (keyboard, RAM) apart from small 
differences. Should differences occur, I will point them out to you. 

After reading this book you will know your computer better and will 
be able to programme more effectively. I have endeavoured to make the 
subjects more interesting with numerous examples since, as everybody 
knows, one picture says more than a thousand words. 



FRITZ SCHAFFER 1986 
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2. GRAPHICS 

One of the most impressive characteristics of all home computers are 
without doubt the graphics which can be created with these machines. 
This is one of the C-16's strongest points, because which other home 
computer offers a resolution of 320 x 200 points in 121 colours 
supported by a very efficient BASIC command set. The only handicap of 
the C-16 without memory expansion when programming graphics is the 
limited work store of 16K RAM of which 12K is available for BASIC. 
Very detailed graphics in many colours need a lot of space in any 
computer. When working in the high resolution graphics mode, the C-16 
has to reserve 10K for the graphics memory which only leaves 2K RAM 
for the actual BASIC programme. If you want to write larger 
programmes in high resolution graphics (and don't have a Plus/4 with 
64K built in RAM), you should consider buying a 16 K or 64 K RAM 
expansion. In the following chapters, I want to show you that you can 
also programme excellent graphics with the C-16 with the normal 
memory of 16K RAM. After all, almost all commercial game programmes 
are based on the basic version and amongst them are surely a few 
which appear to have a large memory but in fact don't. 
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2.1 STANDARD-GRAPHICS 



The easiest way to create graphics on the C-16 is to use the existing 
character set which can be obtained from the keyboard by using the 
COMMODORE- and the SHIFT key. The graphics do not use any additional 
store space and are therefore mainly suitable for longer programmes 
with simple graphic requirements. You can display all symbols on the 
keyboard in 121 different colours, either reverse or flashing. By 
choosing the right symbols, many things can be displayed easily and 
quickly e.g. playing cards, rectangles etc. 

Normally these graphics are programmed in BASIC with PRINT commands, 
consisting of the graphic symbols and the colour etc. In some cases 
it may be more convenient (or unavoidable) to write the required 
characters directly into the graphics store of the C-16. If for 
example you try to write a character at bottom right hand corner of 
the screen (line 25, column 40), you will find that the screen scrolls 
back to the top after the PRINT command, and the bottom right-hand 
corner becomes free again. This problem, however, can be solved 
easily and quickly with a direct entry into the graphics store. 

Let us first have a look at how the C-16 administers the screen 
internally. Two memory spaces belong to each of the 1000 (40x25) 
representable characters in the RAM of the C-16. In one is the 
internal sign code (the so-called Video-RAM) in the other one the 
colour (Colour-RAM). The Video-RAM is in the memory from 3072 
onwards, the Colour-RAM from 2048 onwards; the code of the first 
character (top left* so-called HOME-position) is stored at 3072 and 
the colour at 2048. The next code in Ram is for the character to the 
right of the first position and so on to the end of the first line. 
The easiest way to illustrate this is with the following summary: 
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VIDEO-RAM (3072-4071) 
Column: 1 2 3 ... 38 39 40 
Line: 



1 3072 3073 3074 ... 3109 3110 3111 

2 3112 3151 

3 3152 3191 



23 3952 3991 

24 3992 4031 

25 4032 4033 4034 . . . 4069 4070 4071 

COLOUR-RAM (2048-3047) 



Column 1 2 3 ... 38 39 40 
Line: . 



1 2048 2049 2050 ... 2085 2086 2087 

2 2088 2127 

3 2128 2167 



23 2928 2967 

24 2968 3007 

25 3008 3009 3010 ... 3045 3046 3047 
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You will find the coding of the individual characters in the appendix 
of your manual. The letter A is stored in Video-RAM as value 1. The 
value which is stored in the Colour RAM, consists of the colour, the 
brightness and the information whether the character is to be 
flashing or not. The following short programme erases the screen and 
writes a red flashing heart at the bottom right corner of the screen: 

100 SCNCLR 

110 POKE 4071,83 

120 POKE 3047,184 

The current cursor position is not changed by direct writing on to 
the screen and colour memory; also the unwelcome scrolling (see 
above) ceases. 
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2.2 THE GRAPHIC POSSIBILITIES OF TED 

In this chapter, we will mainly deal with the TED registers which are 
responsible for the graphics. Before we go into the details, I will 
give you an idea of the graphic possibilities the TED-chip of the 
C-16 offers: 

* Free programmable character set with 256 characters 

* Creation of reverse characters by software or hardware 

* Standard- and Multicolour Characters 

* Extended Colour Mode 

* Standard Hires Bitmap Mode 

* Multicolour Bitmap Mode 

* Programmable Scanning Interrupt 

In the following chapters we will discuss all these possibilities and 
explain them with example programmes. 
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2.3 FREE PROGRAMMABLE CHARACTER SET 



As you have already learnt in chapter 2.1 the easiest and least 
memory space consumiccccccphics possibility of the C-16 is the use of 
the existing graphics characters. With this you can display max. 128 
characters as well as further 128 reverse characters, totalling 256. 
Unfortunately you may not often find the required character even 
among these 256 and might ask yourself if it is possible to define a 
character yourself. The answer in short is YES - it is possible! 
because you can tell the TED-chip where to get it's information for 
creating own characters. 

Normally TED receives its information for the character set from a 
special ROM, the so-called Character-ROM, whiich contains the 
standard characters. If you now tell the TED-Chip to retrieve its 
information from RAM, you can define your own characters. Luckily the 
TED-Chip offers two possibilities for a character set of your own: 
firstly you can define the complete character set, i.e. 256 new 
characters or it is possible to only define 128 characters new and 
the reverse characters can be created by the TED-Chip itself. The 
latter has the big advantage that storing space is saved which is 
very limited in our C-16. Therefore instead of 2K RAM for a complete 
256 character set, we only need IK RAM for 128 characters. 

Let us therefore mainly deal with the second possibility because with 
128 self-defined characters almost every problem can be solved. Let's 
have a look how a character is made up: it always consists of a 
Matrix of 8x8 points. If we look at the letter A it gives the 
following picture: 

** 
. . . . 

• . 
** ** 

t • 
****** 

** ** 

** ** 



An asterisk * always stands for a visible, and a point . for an 
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invisible pixel. Within this 8x8 Matrix we can create all sorts of 
characters. Before creating and trying out new characters it is 
advisable to first copy the existing characters from ROM into RAM and 
then replace some of the characters which won't be needed with your 
own characters. In the following chapter, first the character set is 
copied into RAM and then the relevant area protected from overwriting 
by a BASIC Programme. The "©" sign of the standard ch. set is 
replaced by the degree symbol and demonstrated in a short sentence. 
Please key in the following example: 



100 POKE 55,0 : POKE 56,60 : CLR 

110 POKE 1177,62 

120 FOR 1=0 TO 1023 

130 : POKE 60*256+1, PEEK (53248+1) 

140 NEXT I 

150 POKE 1177,63 

160 POKE 65299,60 

170 POKE 65298,192 

180 POKE 1351,128 

190 FOR 1=0 TO 7 

200 : READ A 

210 : POKE 60*256+ I, A 

220 NEXT I 

230 SCNCLR 

240 CHAR 1,6,12, "TEMPERATURE IS 24®C M 

250 CHAR 1,2,23, "PLEASE KEY FOR NORMAL CHARACTER SET" 

260 GETKEY K$ 

270 POKE 65299,208 

280 POKE 65298,196 

290 POKE 1351,0 

300 DATA 24,36,36,24,0,0,0,0 

Now a line by line explanation of this programme: 

100 Reserve memory space for character set 

110 Switch PEEK-routine to ROM-Read 

120-140 Copy character set (IK) into RAM 

150 Switch PEEK-routine to RAM-Read 

160 Character-Set address to 60*256 = 15360 ($3C00 hex) 

170 Read character set from RAM instead of ROM 

180 Switch-off CBM/SHIFT key (make it non-optional) 
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190-220 Poke character definition into RAM 

230 Erase screen 

240-250 Print text on screen 

260 Wait for key 

*If you press any key, your degree symbol is replaced by § from 
normal ch. set. 

270-280 Back to normal character set 

290 Switch-on CBM/SHIFT key 

300 Character definition for degree symbol. This data is used by 

lines 190-220. 
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2*4 HIGH RESOLUTION GRAPHICS 

When writing games, drawing schedules for business use or writing 
other programmes, you will sooner or later require a high resolution 
screen presentation. 

The Commodore C-16 is tailor made for this: High Resolution is 
possible by "Bit-Mapping" the screen. "Bit-Mapping" is the method 
whereby each pixel on the screen gets its own Bit in the memory. If 
this memory bit is one, the corresponding pixel is switched on. If 
bit is a zero, the pixel is switched off. 

Working with high resolution graphics has, however, a few 
disadvantages and is therefore not always used. By Bit-Mapping the 
whole screen, considerable memory space is taken up. Each pixel 
requires a memory bit , i.e. you need 1 Byte for 8 pixel. Since each 
character consists of a 8x8 Matrix and 40 lines x 25 columns are 
available , the resolution is 320 x 200 pixel. That makes 64000 
pixel, of which each requires a memory bit. For Bit-Mapping the whole 
screen you will therefore need 8000 Bytes. 

In order to understand the disadvantages of the Hires-Mode, please 
key an the following example. You will see that you get unwanted 
colour effects. This happens because the C-16 can in Hires-Mode only 
show one foreground and one background colour in each 8x8 field. If 
you try to write on an already used 8x8 field again it changes 
colour. This is exactly what our demo does: 



100 GRAPHIC 1,1 

110 FOR X=0 TO 190 STEP 10 

120 : COLOR 1, ((X/10) AND15)+1,5 

130 BOX 1,X,X,X+16,X+10,,1 

140 NEXT X 

150 FOR X=0 TO 192 STEP 8 

160 : COLOR 1,((X/8)AND15)+1,5 

170 : BOX 1,X+64,X,X+80,X+8,,1 

180 NEXT X 

190 COLOR 1,1,0 : CHAR 1,1,20"KEY PLEASE" 

200 GETKEY K$: GRAPHIC 
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A possible remedy for this problem is supplied by the 
Multicolour-Mode which will be discussed in the next chapter. As an 
example for the Hires-Mode we will present you with a 
Mini-Drawing-Program in machine language. All those, who know little 
or nothing about machine language, should now study chapter 4 before 
starting with the following program. If you are familiar with 
computer language and the C16 built-in monitor as far as being able 
to key in the program and store it , then you should have no problem 
with the following program. We have provided a disassembled listing 
for easier understanding of the program. You can start the program in 
machine language by: G1000. Please remember to SAVE the machine 
program first before trying it out I The operation of the drawing 
program is very simple: you can draw lines in all directions with the 
joystick (in port 2). Keeping the FIRE button pressed on the 
joystick, you can erase the lines again by going over them. You can 
erase your whole work of art by using the SPACE bar. 
For advanced machine language programmers, this program can be used 
as a starting point for own creations. 
Dont 1 be shy, the C-16 can't do more than crash. 



>1000 00 OB 10 00 00 9E 34 31 : 4 

>1008 31 32 00 00 00 00 00 00 :12 

>1010 A9 36 8D 06 FF A9 C8 8D :)6.)h. 

>1018 12 FF 20 EA 10 A2 00 A9 : j.".) 

>1020 33 9D 00 08 9D 00 09 9D :3...... 

>1028 00 OA 9D 00 OB A9 05 9D :....).. 



>1030 00 00 9D 00 OD 9D 00 OE 

>1038 9D 00 OF CA DO El 86 D6 

>1040 A9 AO 85 D5 09 64 85 04 

>1048 E8 86 02 20 E4 FF C9 20 

>1050 DO 03 20 EA 10 20 C5 10 

>1058 DO 02 E6 D2 A5 DO FO 33 

>1060 30 1C A5 D5 18 69 01 85 

>1068 D5 AA A5 D6 69 00 85 D6 

>1070 FO 21 EO 40 90 ID A9 00 



r 

r...jp!.v 
r) ,u)$.t 
r(.r $?i 
rp. *. e. 
rp.&r%p03 
rO.SSu.).. 
ru*%v)..v 
rO! ©..). 
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>1078 85 D5 85 D6 FO 15 38 A5 
>1080 D5 E9 01 85 D5 A5 D6 E9 
>1088 00 BO 06 A9 3f 85 D5 A9 
>1090 01 65 D6 A5 Dl FO IB 30 
>1098 OE A4 D4 C8 CO C8 DO 02 
>10A0 AO 00 84 D4 4C B2 10 A5 
>10A8 D4 38 E9 01 BO 02 A9 C7 
>10B0 85 D4 A5 D2 4A 20 02 11 
>10B8 A2 OF AO FF 88 DO FD CA 
>10C0 DO F8 4C 4B 10 78 A9 FD 
>10C8 8D 08 FF AD 08 FF AO 00 
>10D0 A2 00 4A BO 01 88 4A BO 
>10D8 01 C8 4A BO 01 CA 4A BO 
>10E0 01 E8 86 DO 84 Dl 29 08 
>10E8 58 60 A9 00 85 D7 A9 20 
>10F0 85 D8 A2 20 AO 00 98 91 
>10F8 D7 88 DO FB E6 D8 CA DO 
>1100 F6 60 BO OB 20 1A 11 BD 
>1108 64 11 31 D7 91 D7 60 20 
>1110 1A 11 BD 5C 11 11 D7 91 
>1118 D7 60 A5 D4 29 07 A8 A5 
>1120 D4 29 F8 85 D7 A9 00 06 
>1128 D7 2A 06 D7 2A 06 D7 2A 
>1130 85 D8 85 D3 A5 D7 OA 26 
>1138 D3 OA 26 D3 65 D7 85 D7 
>1140 A5 D8 65 D3 85 D8 A5 D5 
>1148 29 07 AA A5 D5 29 F8 65 
>1150 D7 85 D7 A5 D6 65 D8 69 
>1158 20 85 D8 60 80 40 20 10 
>1160 08 04 02 01 7F BF DF EF 
>1168 F7 FB FD FE DB 20 37 20 
Now SAVE 



r.u.vO.8% 
ru)..u%v) 
r.O.)?.u) 
r..va$q0.0 
r.$th@hp. 
r ..U2.S6 
rt8).0.)g 
r.tS&rj .. 
r". ?.p=j 
rp81k.8)= 
r..?-.? . 
r».j0..jO 
r.hjO.jjO 
r.(.p.q). 
rx )..w) 

J. • A • • • 

rw.pj&xjp 
r6 0. ..= 
r$.lw.w 

rw %t).(% 
rt)8.w).. 
rw*.w*.w* 
r.x.s%w.& 
rs.&s&w.w 
r%x%s.x%u 
r).**u)8% 
rw.w%v*x) 
r ,x .© . 
r....??_/ 
r7;=>[ 7 



the programme on a cassette or disc by the command. 



S" HIGHRESDRAW" , 01 , 1001 , 116C ( Cass . ) 
S M HIGHRESDRAW" ,08, 1001 , 116C (Disc) 

. 1010 A9 36 LDA #$36 

. 1012 8D 06 FF STA $FF06 

. 1015 A9 C8 LDA #$C8 

. 1017 8D 12 FF STA $FF12 

. 101 A 20 EA 10 JSR $10EA 

. 101D A2 00 LDX #$00 
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. 101F 


A9 33 


LDA #$33 


. 1021 


9D 00 08 STA $0800, x 


. 1024 


9D 00 09 STA $0900, x 


. 1027 


9D 00 OA STA $0A00,x 


. 102A 


9D 00 OB STA $0B00,x 


. 102D 


A9 05 


LDA #$05 


. 102F 


9D 00 OC STA $OCOO,x 


. 1032 


9D 00 OD STA $ODOO,x 


. 1035 


9D 00 OE STA $OEOO,x 


. 1038 


9D 00 OF STA $OFOO,x 


. 103B 


CA 


DEX 


. 103C 


DO El 


BNE $101F 


. 103E 


86 D6 


STX $D6 


. 1040 


A9 AO 


LDA #$A0< 


. 1042 


85 D5 


STA $D5 


. 1044 


A9 64 


LDA #$64 


. 1046 


85 D4 


STA $D4 


. 1048 


E8 


I NX 


. 1049 


86 D2 


STX $D2 


. 104B 


20 E4 FF JSR $FFE4 


.- 104E 


C9 20 


CMP #$20 


. 1050 


DO 03 


BNE $1055 


. 1052 


20 EA 10 JSR $10EA 


. 1055 


20 C5 10 JSR $10C5 


. 1058 


DO 02 


BNE $105C 


. 105A 


E6 D2 


INC $D2 


. 105C 


A5 DO 


LDA $D0 


. 105E 


FO 33 


BEQ $1093 


. 1060 


30 1C 


BMI $107E 


. 1062 


A5 D5 


LDA $D5 


. 1064 


18 


CLC 


. 1065 


69 01 


ADC #$01 


. 1067 


85 D5 


STA $D5 


. 1069 


AA 


TAX 


. 106A 


A5 D6 


LDA $D6 


. 106C 


69 00 


ADC #$00 


. 106E 


85 D6 


STA $D6 


. 1070 


FO 21 


BEQ $1093 


. 1072 


EO 40 


CPX #$40 


. 1074 


90 ID 


BCC $1093 


. 1076 


A9 00 


LDA #$00 


. 1078 


85 D5 


STA $D5 
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. 107A 


85 D6 


STA $D6 


. 107C 


FO 15 


BEQ $1093 


. 107E 


38 


SEC 


. 107F 


A5 D5 


LDA $D5 


. 1081 


E9 01 


SBC #$01 


. 1083 


85 D5 


STA $D5 


. 1085 


A5 D6 


LDA $D6 


. 1087 


E9 00 


SBC #$00 


. 1089 


BO 06 


BCS $1091 


. 108B 


A9 3F 


LDA #$3F 


. 108D 


85 D5 


STA $D5 


. 108F 


A9 01 


LDA #$01 


. 1091 


85 D6 


STA $D6 


. 1093 


A5 Dl 


LDA $D1 


. 1095 


FO IB 


BEQ $1082 


. 1097 


30 OE 


BMI $10A7 


. 1099 


A4 D4 


LDY $D4 


. 109B 


C8 


INY 


. 109C 


CO C8 


CPY #$C8 


. 109E 


DO 02 


BNE $10A2 


. 10A0 


AO 00 


LDY #$00 


. 10A2 


84 D4 


STY $D4 


. 10M 


4C B2 10 JMP $10B2 


. 10A7 


A5 D4 


LDA $D4 


. 10A9 


38 


SEC 


. 10AA 


E9 01 


SBC #$01 


. 10AC 


BO 02 


BCS $10B0 


. 10AE 


A9 C7 


LDA #$C7 


. 10B0 


85 D4 


STA $D4 


. 10B2 


A5 D2 


LDA $D2 


. 10B4 


4A 


LSR 


. 10B5 


20 02 11 JSR $1102 


. 10B8 


A2 OF 


LDX #$0F 


. 10BA 


AO FF 


LDY #$FF 


. 10BC 


88 


DEY 


. 10BD 


DO FD 


BNE $10BC 


. 10BF 


CA 


DEX 


. 10C0 


DO F8 


BNE $10BA 


. 10C2 


4C 4B 10 JMP $104B 


. 10C5 


78 


SEI 


. 10C6 


A9 FD 


LDA #$FD 


. 10C8 


8D 08 FF STA $FF08 
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. 10CB 


AD 08 FF LDA $FF08 


. 10CE 


AO 


00 


LDY #$00 


. 10DO 


A2 


00 


LDX #$00 


. 10D2 


4A 




LSR 


. 10D3 


BO 


01 


BCS $10D6 


. 10D5 


88 




DEY 


. 10D6 


4A 




LSR 


. 10D7 


BO 


01 


BCS $10DA 


. 10D9 


C8 




INY 


. 10DA 


4A 




LSR 


. 10DB 


BO 


01 


BCS $10DE 


. 10DD 


CA 




DEX 


. 10DE 


4A 




LSR 


. 10DF 


BO 


01 


BCS $10E2 


. 10E1 


E8 




INX 


. 10E2 


86 


DO 


STX $D0 


. 10E4 


84 


Dl 


STY $D1 


. 10E6 


29 


08 


AND #$08 


. 10E8 


58 




CLI 


. 10E9 


60 




RTS 


. 10EA 


A9 


00 


LDA #$00 


. 10EC 


85 


D7 


STA $D7 


. 10EE 


A9 


20 


LDA #$20 


. 10FO 


85 


D8 


STA $D8 


. 10F2 


A2 20 


LDX #$20 


. 10F4 


AO 


00 


LDY #$00 


. 10F6 


98 




TYA 


. 10F7 


91 


D7 


STA ($D7),Y 


. 10F9 


88 




DEY 


. 10FA 


DO FB 


BNE $10F7 


. 10FC 


E6 


D8 


INC $D8 


. 10FE 


CA 




DEX 


. 10FF 


DO 


D6 


BNE $10F7 


. 1101 


60 




RTS 


. 1102 


BO 


OB 


BCS $110F 


. 1104 


20 1A 11 JSR $111A 


. 1107 


BD 64 11 LDA $1164, X 


. 110A 


31 


D7 


AND ($D7),Y 


. HOC 


91 


D7 


STA ($D7),Y 


. HOE 


60 




RTS 


. 110F 


20 1A 11 JSR $111A 


. 1112 


BD 5C 11 LDA $115C,X 
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1115 


11 D7 


ORA ($07), Y 


1117 


91 D7 


STA ($D7),Y 


1119 


60 


RTS 


111A 


A5 D4 


LDA $D4 


111C 


29 07 


AND #$07 


HIE 


A8 


TAY 


111F 


A5 D4 


LDA $04 


1121 


29 F8 


AND #$F8 


1123 


85 D7 


STA $D7 


1125 


A9 00 


LDA #$00 


1127 


06 D7 


ASL $D7 


1129 


2A 


ROL 


112A 


06 D7 


ASL $D7 


112C 


2A 


ROL 


112D 


06 D7 


ASL $D7 


112F 


2A 


ROL 


1130 


85 D8 


STA $D8 


1132 


85 D3 


STA $D3 


1134 


A5 D7 


LDA $D7 


1136 


0A 


ASL 


1137 


26 D3 


ROL $D3 


1139 


OA 


ASL 


113A 


26 D3 


ROL $D3 


113C 


65 D7 


ADC $D7 


113E 


85 D7 


STA $D7 


1140 


A5 08 


LDA $D8 


1142 


65 03 


ADC $D3 


1144 


85 08 


STA $D8 


1146 


A5 05 


LDA $D5 


1148 


29 07 


AND #$07 


114A 


AA 


TAX 


114B 


A5 05 


LDA $D5 


114D 


29 F8 


AND #$F8 


114F 


65 D7 


ADC $D7 


1151 


85 D7 


STA $D7 


1153 


A5 D6 


LDA $D6 


1155 


65 D8 


ADC $D8 


1157 


69 20 


ADC #$20 


1159 


85 D8 


STA $D8 


115B 


60 


RTS 



>115C 80 40 20 10 08 04 02 01 :r.@ .... 
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2.5 MULTICOLOUR-GRAPHICS 



Because of the standard high resolution graphics, you can even 
address individual pixels on the screen. There are two values for 
each pixel in the character memory: a 1 for "on" and for "off". If 
a pixel has the value 1, it will be shown in the colour chosen by you 
at the chosen screen position. With high resolution graphics all 
pixels within an 8x8 matrix can be shown either in the foreground or 
background colour. Thus the colour resolution within this area is 
limited. There could for example be problems if two lines with 
different colours cross (see last example in previous chapter). 
This problem is solved by the Multicolour-Mode. Each pixel can have 
One of four colours: screen colour (background register 0,65301), 
background colour 1 (65302), background colour 2 (65303) or the 
character colour. The only restriction is in the horizontal 
resolution, since in the Multicolour-Mode each pixel is twice as wide 
as in Hires-Graphics. The advantages of the Multicolour-Mode, 
however, prevail by far. Here is a first example: 



100 GRAPHIC 3,1 

110 COLOR 0,1,0 : COLOR 1,3,0 : COLOR 2,8,7 : COLOR 3,13,4 

120 FOR C=3 to 1 STEP -1 

130 : FOR A=0 TO 180 STEP 10 

140 : CIRCLE C,20+C*30,100,10,50,,,A,20 

150 : NEXT A 

160 NEXT C 

170 COLOR 1,2,7 : CHAR 1,1, 20, "PLEASE KEY" 

180 GETKEY K$ : DRAW 0,0,100 to 159,100 

190 GETKEY K$ : GRAPHIC 



EXPLANATION LINE BY LINE: 



110 Definition of background colour 0, foreground colour, back- 
ground colours 1 & 2 

120 Draw in each of the three colours 
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130 Draw ovals at different angles 

140 Draw oval 

150 Next angle 

160 Next colour 

170 Character colour on white, print text 
180 Wait for key. Draw line. 

190 Wait for key. Back to normal text mode. 

As you can see the three circles are drawn in different colours 
without showing after-colourings. This effect appears only if you key 
in another colour. In practice (and in most commercial games) mostly 
this graphic mode is mostly used. It among other things also allows 
for the programming of Software-Sprites (more about this later). 

Because of the limited memory it is also useful in this mode to work 
with self -defined characters. But you have to consider that text 
fade-ins are not so easily possible since the integral character set 
in the C-16 is designed for the normal mode. That is why the letters 
often look a bit odd. This can be avoided by a character set of your 
own. In contrast to the normal mode the multicolour characters do not 
use a Bit for a pixel each, but 2 Bits determine the colour. 
Therefore only 4 pixel are available widthwise (hence the resolution 
of 160x200). The coordination of the colours to the Bit combinations 
table is shown below. 



BITS 


COLOUR SOURCE 




00 


Background 


(65301) 


01 


Background 1 


(65302) 


10 


Background 2 


(65303) 


11 


Foreground 
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Let's look at the following self defined character, where we have 

chosen as background colour (HO) black, background colour 1 (HI) 

red, background colour 2 (H2) yellow and foreground colour (VO) 
green : 



BIT SAMPLE 



COLOUR SOURCE 



COLOURS 



00 01 10 00 



HO HI H2 HO 



black red yellow black 



00 11 11 00 



HO VO VO HO 



black green green black 



01 10 01 10 



HI H2 HI H2 



red yellow red yellow 



01 11 11 10 



HI VO VO H2 



red green green yellow 



01 10 01 10 



HI H2 Hi H2 



red yellow red yellow 



01 10 01 10 



HI H2 HI H2 



red yellow red yellow 



01 10 01 10 



HI H2 HI H2 



red yellow red yellow 



00 00 00 00 



HO HO HO HO 



black black black black 



The following example copies again the normal character set into RAM 
and then creates own Multicolour-Characters for a butterfly: 



100 POKE 55,0 : POKE 56,60 : CLR 

110 POKE 1177,62 

120 FOR 1=0 TO 1023 

130 : POKE 60*256+1, PEEK(53248+I) 

140 NEXT I 

150 POKE 1177,63 

160 POKE 65299,60 

170 POKE 65298,192 

180 POKE 65287,24 

190 POKE 1351,128 
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200 POKE 65302,0 : POKE 65303,93 

210 FOR 1=0 TO 15 

220 : READ A 

230 I POKE 60*256+8*40+1, A 

240 NEXT I 

250 5CNCLR 

260 PRINT TAB(5)CHR$(154) M HALL0 BUTTERFLY" 

270 PRINTrPRINT TAB(10)' , ()"SPC(10)CHR$(153)"O" 

280 CHAR 1,2,23, "KEY FOR NORMAL CHARACTER SET" 

290 GETKEY K$ 

300 POKE 65299,208 

310 POKE 65298,196 

320 POKE 65287,8 

330 POKE 1351,0 

340 DATA 196,241,237,237,253,253,241,193 

350 DATA 76,60,236,236,252,252,60,12 



EXPLANATION LINE BY LINE 

100 Reserve memory space for character set 

110 Switch PEEK-routine to ROM-read 

120-140 Copy character set (IK) into RAM 

150 Switch PEEK-routine to RAM-read 

160 Character set address to 60*256 = 15360 ($3C00) 

170 Read character set out of RAM instead of ROM 

180 Switch-on Multicolour-Mode 

190 Switch-off CBM/SHIFT key 
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200 Background colour 1 on black, 2 on light blue no. 5 



210-240 Poke character definition of buttjerfly into RAM 



250 Erase screen 



260-280 Print text and butterflies 



290 Wait for key 



300-320 Restore standard values 



330 Switch-on CBM/SHIFT key 



340-350 Character definition for Multicolour butterfly 



Finally two examples for animated graphics] as well as a Multicolour 
version of the mini drawing program. First we alter the previous 
butterfly demo by defining 3 different butterflies and portray these 
alternately, i.e. in the sequence: 1,2,3,2,1,2,3,2,1,... thereby 
creating the impression that the butterfly 1 is moving. 

The 2nd example shows the use of the SHAPEr commands of the C-16 which 
allow a Sprite-like animation in the Multicolour-Mode. 



The 3rd example is a Multicolour-variant of the mini drawing program 
which you saw in the previous chapter. This time you can choose 
between the 3 Multicolour-Colours by pressing a button and clear the 
screen by using the space bar. 
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100 POKE 55,0 : POKE 56,60 : CLR 

110 POKE 1177,62 

120 FOR 1=0 TO 1023 

130 : POKE 60*256+1, PEEK(53248+I) 

140 NEXT I 

150 POKE 1177,63 

160 POKE 65299,60 

170 POKE 65298,192 

180 POKE 65287,24 

190 POKE 1351,128 

200 POKE 65302,0 : POKE 65303,93 

210 FOR 1=0 TO 47 

220 : READ A 

230 : POKE 60*256+8*40+1, A 

240 NEXT I 

250 SCNCLR 

260 PRINT TAB(6)CHR$(154) "HALLO BUTTERFLY" 

270 CHAR 1,1 ,23, "KEY FOR NORMAL CHARACTER SET" 

280 Y=24 : Yl=24 

290 GET K$ : IF K$<>"" THEN PRINT CHR$(144) : goto 360 

300 A$="()" : GOSUB 410 

310 A$="*+" : GOSUB 410 

320 A$=»,-" : GOSUB 410 

330 A$="*+" : GOSUB 410 

340 GOTO 290 

350 GETKEY K$ 

360 POKE 65299,208 

370 POKE 65298,196 

380 POKE 65287,8 

390 POKE 1351,0 

400 END 

410 CHAR 1,12,Y1," " 

420 CHAR 1,12,Y,CHR$(154)+A$ 

430 CHAR 1,18,Y1," " 

440 CHAR 1,18,Y,CHR$(153)+A$ 

450 Y1=Y : Y=Y-1 : IF Y<0 THEN Y=24 

460 RETURN 

470 DATA 196,241,237,237,253,253,241,193 

480 DATA 76, 60, 236, 236, 252, 252, 60, 12, 52, 49, £7, 61, 61, 49, 49, 49 

500 DATA 112,48,176,240,240,48,48,48,4,3,3,3,3,3,3,3 

520 DATA 64,0,0,0,0,0,0,0 
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Explanation line by line: 



100 Reserve memory space for character set 

110 Switch PEEK-routine to ROM-read 

120-140 Copy character set (IK) into RAM 

150 Switch PEEK-routine to RAM-read : 

160 Character set address at 60*256 t= 15360 ($3C00) 

170 Read character set from RAM instead of ROM 

180 Switch-on Multicolour-Mode 

190 Switch-off CBM/SHIFT key 

200 Background colour 1 : black, 2 : jLight blue no. 5 

210-240 Poke character definition of butterfly into RAM 

250 Erase screen 

260-270 Print text 

280 Start of butterflies on bottom screen edge 

290 Wait for key. If yes, finish program. 

300 1. Create variant of butterfly 

310 2. " " " " 

320 3. " " " " 

330 4. " " " " 

340 Back to start of loop 

350-400 Normal colours, end of program 
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410 
420 
430 
440 
450 
460 



Write two spaces in previous posi 
Colour blue, show right butterfly 



tion of right butterfly- 



Write two spaces in previous position of left butterfly 
Colour green, show left butterfly 



Move Yl one line. If at top, then start again at bottom. 



Sub-program finish 



470-520 Definition of the 3 variants of butterfly. 



Here is the 3rd example, the mini drawing program, which you already 
know from the Hires chapter, in Multicolour^ 



>1000 00 OB 10 00 00 9E 


34 31 : 


:r 41 


>1008 31 32 00 00 00 00 


00 00 : 


:rl2 


>1010 A9 36 8D 06 FF A9 


18 8D : 


:r)6..?).. 


>1018 07 FF A9 C8 8D 12 


FF 20 : 


:r.?)h..? 


>1020 CE 10 A2 00 A9 33 


9D 00 : 


:rn.".)3.. 


>1028 08 9D 00 09 9D 00 


OA 9D ; 


:r 


>1030 00 OB A9 52 9D 00 


OC 9D : 


Hi i Jltt i • 


>1038 00 OD 9D 00 OE 9D 


00 OF : 


:r 


>1040 CA DO El A9 30 8D 


15 FF : 


:rjp!)0..? 


>1048 A9 77 8D 16 FF E8 


86 D2 : 


:r)7..?(.r 


>1050 A9 50 85 D6 A9 64 


85 D5 i 


;r)p.v)$.u 


>1058 20 E4 FF C9 20 DO 


03 20 : 


tr $?i p. 


>1060 CE 10 20 A9 10 DO 08 E6 ; 


irn. ).p.& 


>1068 D2 A5 D2 29 03 85 


D2 A5 : 


\it%t)..t% 


>1070 DO 18 65 D6 c9 FF 


DO 04 - 


:rp.%vi?p. 


>1078 A9 9F DO 06 C9 AO 


90 02 : 


:r).p.i .. 


>1080 A9 00 85 D6 A5 Dl 


18 65 : 


\i).,v%q.% 


>1088 D5 C9 FF DO 04 A9 


C7 DO : 


:rui?p.)gp 


>1090 06 C9 C8 90 02 A9 


00 85 : 


:r.ih..).. 


>1098 D5 20 E6 10 A2 OF 


AO FF 


:ru &.". ? 
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>10A0 88 


DO FD CA DO F8 4C 58 : 


r.p=jp81x 


>10A8 10 


78 A9 FD 8D 08 FF AD : 


:r.8)=..?- 


>10B0 08 


FF AO 00 A2 00 4A BO : 


r.? .".jO 


>10B8 01 


88 4A BO 01 C8 4A BO : 


r..j0.hjO 


>10C0 01 


CA 4A BO 01 E8 86 DO ! 


r.jjO.(.p 


>10C8 84 


Dl 29 08 58 60 A9 00 : 


r.q).x ). 


>10D0 85 


D7 A9 20 85 D8 A2 20 : 


r.w) .x" 


>10D8 A0 


06 98 91 D7 88 DO FB : 


:r ...w.p; 


>10E0 E6 


D8 CA DO F6 60 A5 D5 : 


r&xjp6 %u 


>10E8 29 


07 A8 A5 D5 29 f 8 85 : 


r).(*u)8. 


>10F0 D7 


A9 00 85 04 06 D7 2A : 


:rw)..t.w* 


>10F8 06 


D7 2A 06 D7 2A 85 D8 : 


;r.w*.w*.x 


>1100 85 


D3 A5 D7 OA 26 D3 OA : 


:r.s%w.&s. 


>1108 26 


D3 65 D7 85 D7 A5 D8 : 


:r&s$6w.w%x 


>1110 65 


D3 85 D8 A5 D6 29 FC : 


:i%s.x%v)< 


>1118 OA 


26 D4 65 D7 85 D7 A9 : 


:r.&t%w.w) 


>1120 20 


65 D8 65 D4 85 D8 A5 : 


:r %x%t.x% 


>1128 D6 29 03 AA Bl D7 3D 42 : 


:rv).*lw=b 


>1130 11 


85 D3 BD 42 11 49 FF : 


:r..s=b.i? 


XL 138 A6 


D2 3D 46 11 05 D3 91 : 


:r&r=f..s. 


XL 140 D7 60 3F CF F3 FC 00 55 i 


•rw ?o3<.u 


>1148 AA FF AA AA AA AA AA AA , 


. * * * *9 



SAVE the prog, on Cass, or Disc 
S"MULTIDRAW M ,01,1001,114A (Cass.) 
S"MULTIDRAW»,08,1001,114A (Disc) 



1010 


A9 36 LDA #$36 


1012 


8D 06 FF STA $FF06 


1015 


A9 18 LDA #$18 


1017 


8D 07 FF STA $FF07 


101A 


A9 C8 LDA #$C8 


101C 


8D 12 FF STA $FF12 


101F 


20 CE 10 JSR $10CE 


1022 


A2 00 LDX #$00 


1024 


A9 33 LDA #$33 


1026 


9D 00 08 STA $0800, X 
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. 1029 


9D 00 09 STA $0900, X 


. 102C 


9D 00 0A STA $0A00,X 


. 102F 


9D 00 OB STA $0B00,X 


. 1032 


A9 52 


LDA #$52 


. 1034 


9D 00 OC STA $0C00,X 


. 1037 


9D 00 OD STA $0D00,X 


. 103A 


9D 00 OE STA $0E00,X 


. 103D 


9D 00 OF STA $0F00,X 


. 1040 


CA 


DEX 


. 1041 


DO El 


BNE $1024 


. 1043 


A9 30 


LDA #$30 


. 1045 


8D 15 FF STA $FF15 


. 1048 


A9 77 


LDA #$77 


. 104A 


8D 16 FF STA $FF16 


. 104D 


E8 


INX 


. 104E 


86 D2 


STX $D2 


. 1050 


A9 50 


LDA #$50 


. 1052 


85 D6 


STA $D6 


. 1054 


A9 64 


LDA #$64 


. 1056 


85 D5 


STA $D5 


. 1058 


20 E4 FF JSR $FFE4 


. 105B 


C9 20 


CMP #$20 


. 105D 


DO 03 


BNE $1062 


. 105F 


20 CE 10 JSR $10CE 


. 1062 


20 A9 10 JSR $10A9 


. 1065 


DO 08 


BNE $106F 


. 1067 


E6 D2 


INC $D2 


. 1069 


A5 D2 


LDA $D2 


. 106B 


29 03 


AND #$03 


. 106D 


85 D2 


STA $D2 


. 106F 


A5 DO 


LDA $D0 


. 1071 


18 


CLC 


. 1072 


65 D6 


ADC $D6 


. 1074 


C9 FF 


CMP #$FF 


. 1076 


DO 04 


BNE $107C 


. 1078 


A9 9F 


LDA #$9F 


. 107A 


DO 06 


BNE $1082 


. 107C 


C9 AO 


CMP #$A0 


. 107E 


90 02 


BCC $1082 


. 1080 


A9 00 


LDA #$00 


. 1082 


85 D6 


STA $D6 


. 1084 


A5 01 


LDA $D1 
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10D0 


85 D7 


STA $D7 


10D2 


A9 20 


LDA #$20 


10D4 


85 D8 


STA $D8 


10D6 


A2 20 


LDX #$20 


10D8 


AO 00 


LDY #$00 


10DA 


98 


TYA 


10DB 


91 D7 


STA ($D7),Y 


10DD 


88 


DEY 


10DE 


DO FB 


BNE $10DB 


10EO 


E6 D8 


INC $D8 


10E2 


CA 


DEX 


10E3 


DO F6 


BNE $10DB 


10E5 


60 


RTS 


10E6 


A5 D5 


LDA $D5 


10E8 


29 07 


AND #$07 


10EA 


A8 


TAY 


10EB 


A5 D5 


LDA $D5 


10ED 


29 F8 


AND #$F8 


10EF 


85 D7 


STA $D7 


10F1 


A9 00 


LDA #$00 


10F3 


85 D4 


STA $D4 


10F5 


06 D7 


ASL $D7 


10F7 


2A 


ROL 


10F8 


06 D7 


ASL $D7 


10FA 


2A 


ROL 


10FB 


06 D7 


ASL $D7 


10FD 


2A 


ROL 


10FE 


85 D8 


STA $D8 


1100 


85 D3 


STA $D3 


1102 


A5 D7 


LDA $D7 


1104 


OA 


ASL 


1105 


26 D3 


ROL $D3 


1107 


OA 


ASL 


1108 


26 D3 


ROL $D3 


110A 


65 D7 


ADC $D7 


HOC 


85 D7 


STA $D7 


HOE 


A5 D8 


LDA $D8 


1110 


65 D3 


ADC $D3 


1112 


85 D8 


STA $D8 


1114 


A5 D6 


LDA $D6 


1116 


29 FC 


AND #$FC 


1118 


OA 


ASL 
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1119 


26 D4 


ROL $D4 


111B 


65 D7 


ADC $D7 


HID 


85 D7 


STA $D7 


111F 


A9 20 


LDA #$20 


1121 


65 D8 


ADC $D8 


1123 


65 D4 


ADC $D4 


1125 


85 D8 


STA $D8 


1127 


A5 D6 


LDA $D6 


1129 


29 03 


AND #$03 


112B 


AA 


TAX 


112C 


Bl D7 


LDA ($D7),Y 


112E 


3D 42 11 AND $1142, X 


1131 


85 D3 


STA $D3 


1133 


BD 42 11 LDA $1142, X 


1136 


49 FF 


EOR #$FF 


1138 


A6 D2 


LDX $D2 


113A 


3D 46 11 AND $1146, X 


113D 


05 D3 


ORA $D3 


113F 


91 D7 


STA ($D7),Y 


1141 


60 


RTS 



>1142 3F CF F3 FC 00 55 AA FF :r?o3<.u*? 
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2.6 EXTENDED COLOUR-GRAPHICS 



In this unfortunately little known mode, you can use one of the four 
background colours for each character on the screen. It is for 
example possible to show a blue character wjtth a yellow background on 
a white screen. This choice of colours has pf course also its price: 
we can only use 64 different characters sinpe the two top Bits of the 
character have to be used for definition of: the background colour. 
The following chart should make this clear: 



SCREEN CODE CHARACTER BACKGR0UND4-C0L0UR REGISTER 

H 



65301 
65302 
65303 
65304 

Program below will show you the practical amplication of this mode: 



100 SCNCLR 

110 COLOR 0,1,2 

120 COLOR 1,2,3 

130 COLOR 2,4,5 

140 COLOR 3,6,7 

150 POKE 65286, PEEK (65286 )0R64 

160 FOR 1=0 TO 63 

170 : POKE 3072+1,1 

180 : POKE 3136+1,1+64 

190 : POKE 3200+1,1+128 

200 : POKE 3264+1,1+192 

210 NEXT I 

220 1=0 
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0-63 


0-63 


64 - 127 


0-63 


128 - 191 


0-63 


192 - 255 


0-63 



230 FOR C=0 TO 15 

240 : FOR L=0 TO 7 

250 : POKE 2048+1, L*16+C 

260 : POKE 2176+I,L*16+C 

270 : 1=1+1 

280 : NEXT L 

290 NEXT C 

300 CHAR 1 , 14 , 12 , "PLEASE 

65286 , PEEK ( 65286 ) AND191 

310 COLOR 0,2,7 



KEY" 



GETKEY 



K$ 



POKE 



EXPLANATION LINE BY LINE: 



100 



Erase screen 



110-140 Choose background colours 



150 



Switch-on Extended Colour Mode 



160 



For each possible character: 



170 



Create one set with background colour 1 



180 



ft II It 



190 



tr tt it 



200 



n it it 



210 



Next character 



220 



Put variant 1 to 



230-240 For each colour and brightness: 

250-260 Write colour and brightness into colour memory 



270 



Increment pointer 



280-290 Next brightness and colour 
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300 Print text, wait for key, normal mode. 
310 Switch-on normal background colour (white), 
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2.7 SOFT SCROLLING 



When the last line of the C-16's screen is filled with text, the 
whole picture is automatically scrolled one line up. That means the 
top line is removed and all other lines move towards the top by one 
position. This scrolling happens normally line by line but there are 
other situations where it would be desirable for this scrolling to be 
soft, i.e. only by one pixel. 



The TED-Graphic Chip offers even this possibility and at least the 
vertical scrolling is programmable in BASIC. Firstly the no. of 
screen lines has to be reduced to 24 (Bit 3 of register 65286). The 
bottom 3 Bits of the same register define the scroll-position from 
to 7. As soon as this value has reached 7, a completely new line 
becomes visible. We then have to set this value to again and get 
the next line. The following BASIC-Program demonstrates this effect: 



100 SCNCLR 

110 FOR 1=0 TO 24 

120 : GOSUB 240 

130 NEXT I 

140 SR=65286 

150 FOR T=l TO 20 : NEXT T 

160 POKE SR,(PEEK(SR)AND240)0R 7 

170 GOSUB 240 

180 FOR 1=6 TO STEP -1 

190 : FOR T=l TO 60 : NEXT T 

200 : POKE SR,(PEEK(SR)AND240)0R I 

210 NEXT I 

220 GET K$ : IF K$="" THEN 150 

230 POKE SR,(PEEK(SR)AND240)0R 11 : END 

240 PRINT CHR$(13) M PRESS ANY KEY"; : RETURN 
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LINE BY LINE EXPLANATION: 

100 Erase screen 

110-130 Print text on screen 

140 Put SR on address of Scroll-Register (vertical) 

150 Time loop 

160 Put on 24 lines and Scroll-Value on 7 

170 Print message on presently invisible line 25 

180 Decrement Scroll- Value 

190 Time loop 

200 Put Scroll-Value 

210 Next value 

220 Check key 

230 Put on 25 lines again and normal Scroll-Value (3) 

240 Subroutine, to print message 



In the next chapter you will find another example of horizontal 
scrolling (in machine code), which together with the Raster Interrupt 
is responsible for good effects. 
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2.8 THE RASTER-INTERRUPT 



The C-16 has the possibility to interrupt the processor dependant on 
the screen beam (raster) which creates the TV-picture. This can be 
used to write data on the screen while the raster beam is not on the 
screen, thus avoiding a flicker. Furthermore it is possible to 
subdivide the screen into different working areas. This is also used 
by the C-16 s BASIC in order to utilise the divided screen in graphic 
modes 2 and 4. 



In order to create a Raster Interrupt you have to put Bit 1 of the 
Interrupt Enable Register ($FF0A) to 1. The lower 8 Bits of the line 
in which an interrupt is to be created has to be written into 
register $FF0B and the 9th Bit in Bit of register $FF0A. As soon as 
the raster beam arrives at the selected line a raster interrupt is 
genrated and Bit 1 of the Raster Interrupt Status Register ($FF09) 
set to 1. To facilitate things you best look at the next example 
which creates a black band on the screen background. 



>1000 00 OC 10 00 00 9E 34 31 


:r 41 


>1008 31 32 00 00 00 00 00 00 


:rl2 


>1010 78 A9 29 8D 14 03 A9 10 


:r8))...). 


>1018 8D 15 03 A9 02 8D 0A FF 


• 1. m m m J m m • • 


>1020 A9 30 8D OB FF 58 4C 26 


:r)0..?xl& 


>1028 10 AD 09 FF 8D 09 FF AD 


:r.-.?..?- 


>1030 OB FF C9 50 90 OB A9 30 


:r.?ip..)0 


>1038 8D OB FF EE 15 FF 4C 49 


:r..?..?li 


>1040 10 A9 50 8D OB FF CE 15 


:r.)p..?n. 


>1048 FF 68 A8 68 AA 68 40 AA 


:r?(((*(®* 



SAVE prog, on Cass, or Disc 
S"RASTER-DEM0",01,1001,104F (Cass. ) 
S"RASTER-DEMO" , 08 , 1001 , 104F ( Disc) 
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1010 


78 SEI 


1011 


A9 29 LDA #$29 


1013 


8D 14 03 STA $0314 


1016 


A9 10 LDA #$10 


1018 


8D 15 03 STA $0315 


101B 


A9 02 LDA #$02 


101D 


8D OA FF STA $FFOA 


1020 


A9 30 LDA #$30 


1022 


8D OB FF STA $FFOB 


1025 


58 CLI 


1026 


4C 26 10 JMP $1026 


1029 


AD 09 FF LDA $FF09 


102C 


8D 09 FF STA $FF09 


102F 


AD OB FF LDA $FFOB 


1032 


C9 50 CMP #$50 


1034 


90 OB BCC $1041 


1036 


A9 30 LDA #$30 


1038 


8D OB FF STA $FFOB 


103B 


EE 15 FF INC $FF15 


103E 


4C 49 10 JMP $1049 


1041 


A9 50 LDA #$50 


1043 


8D OB FF STA $FFOB 


1046 


CE 15 FF DEC $FF15 


1049 


68 PLA 


104A 


a8 TAY 


104B 


68 PLA 


104C 


AA TAX 


104D 


68 PLA 


104E 


40 RTI 



Finally we would like to show you a program which shows the graphic 
possibilities of TED with Soft Scrolling and Raster Interrupt quite 
impressively. The combination of these two functions is used in many 
commercial games, e.g. to see a moving landscape. In our example we 
will put 3 texts onto the screen of which the middle one can be moved 
gently across the screen with the joystick - in both directions with 
variable speed. When you have analysed and understood this example, 
it shouldn't be too difficult anymore for you to write excellent 
graphic effects and programs of your own. 
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>1000 


00 OB 10 00 00 


9E 34 


31 : 


41 


>1008 31 32 00 00 00 


00 00 


00 : 


rl2 


>1010 


A9 CF 8D 15 FF 


A2 00 


A9 : 


r)o..?".) 


>1018 


20 90 00 OC 9D 


00 OD 


9D : 


A ••••••• 


>1020 00 0E 9D 00 OF 


A9 00 


9D : 


!.<*%•%•)%• 


>1028 


00 08 9D 00 09 


9D 00 


OA : 


^•••••••« 


>1030 


9D 00 OB CA DO 


El AO 


12 : 


r...JP! . 


>1038 


B9 9F 11 99 82 


OC 99 2A : 


r9 * 


>1040 


OF B9 B2 11 99 


D2 OC 


99 : 


r.92..r.. 


>1048 


7A OF B9 C5 11 


99 C2 


OD : 


r:.9E..B. 


>1050 B9 D8 11 99 62 


OE A9 


26 : 


r9x..".)& 


>1058 


99 C2 09 99 62 


OA 88 


10 : 


r.B.."... 


>1060 


D7 86 DO 86 DB 20 8F 


10 : 


rw.P.[ .. 


>1068 


20 Bl 10 A9 FD 


8D 08 


FF : 


r 1.)=..? 


>1070 


AD 08 FF A2 00 


4A 4A 


4A ! 


r-.? M .JJJ 


>1078 


BO 01 CA 4A BO 


01 E8 


8A : 


tO.JJO.C 


>1080 


18 65 DO C9 F7 


FO El 


C9 : 


r.*PI70!I 


>1088 


09 FO DD 85 DO DO D9 


78 : 


r.0].PPY8 


>1090 


A9 73 8D 14 03 


A9 11 


8D : 


r)3...).. 


>1098 


15 03 A9 02 8D 


OA FF 


A9 : 


r. .)...?) 


>10A0 


00 85 DA 85 D9 A9 5A 8D : 


:r..z.Y)z. 


>10A8 


OB FF A9 00 8D 07 FF 


58 : 


r.?)...?x 


>10B0 


60 A5 DB FO FC A9 00 


85 : 


T X[0<).. 


>10B8 


DB A5 D9 18 65 


DO A8 


29 : 


r[SKY.%P() 


>10C0 


07 85 D9 98 29 


08 DO 


01 j 


:r..Y.).P. 


>10C8 60 A2 05 A9 OD 85 D2 85 : 


r ».)..r. 


>10D0 


D4 A9 09 85 D6 


85 D8 


A9 : 


;rt)..v.x) 


>10D8 


90 85 Dl 98 10 


31 AO 


FF i 


;r..q..l ? 


>10E0 A5 Dl 18 69 28 


85 Dl 


85 : 


:r%q.)(.q. 


>10E8 


D3 85 D5 85 D7 


90 08 


E6 : 


irs.u.w. .& 


>10FO 


D2 E6 D4 E6 D6 


E6 D8 E6 ; 


;rr&t&v&x& 


>10F8 


D3 E6 D7 C8 Bl 


D3 91 


Dl : 


:rs&whls.q 


>1100 Bl 07 91 D5 CO 


27 DO F3 


irlw.u®'P3 


>1108 


CA DO D3 84 DA FO 2D 


AO 


srJPs.zO- 


>1110 


26 A5 Dl 18 69 


28 85 


Dl ■ 


:r&%q.)(.q 


>1118 85 D3 85 D5 85 


D7 90 


08 


:r.s.u.w.. 


>1120 E6 D2 E6 D4 E6 


D6 E6 


D8 


:r&r&t&v&x 


>1128 E6 D3 E6 07 Bl 


Dl 91 


D3 


:r&s&wlq.s 


>1130 Bl D5 91 D7 88 


10 F5 


CA 


:rlu.w..5J 


>1138 


DO D5 86 DA A2 


05 A4 


DA 


:rPu.z".$z 
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>1140 A9 00 85 D2 A9 09 85 D6 


:r)..r),.v 


>1148 A9 90 85 Dl 85 D5 A5 Dl : 


:r)..q.u%q 


>1150 18 69 28 85 Dl 85 D5 90 : 


:r.)(.q.u. 


>1158 04 E6 D2 E6 D6 98 49 27 ; 


:r.&r&v.r 


>1160 A8 Bl Dl 85 DC Bl D5 A4 : 


:r(lq.£lu$ 


>1168 DA 91 05 A5 DC 91 Dl CA : 


:rz.u%£.qO 


>1170 DO DC 60 AD 09 FF 8D 09 : 


:rP£ -.?.. 


>1178 FF AE OB FF A9 40 EO 83 : 


:r?..?)@ . 


>1180 FO 08 05 D9 A2 83 86 DB : 


:r0..Y"..[ 


>1188 DO 02 A2 5A 8E OB FF 29 : 


:rP."z..?) 


>1190 07 EC ID FF FO FB 8D 07 : 


.r.,.?0;.. 


>1198 FF 68 A8 68 AA 68 40 20 : 


r?(((*(@ 


>11A0 04 09 05 13 05 12 20 14 : 


:R 


>11A8 05 09 OC 20 08 09 05 12 : 


:R 


>11B0 20 20 20 20 20 02 OC 05 : 


!n • • • 


>11B8 09 02 14 20 13 14 05 08 : 


.R 


>11C0 05 OE 20 20 20 16 05 12 ! 


r\ • • • • t 


>11C8 13 03 08 09 05 02 05 20 : 


:R 


>11D0 04 01 13 20 08 09 05 12 : 


K* • # •••• 


>11D8 OD 09 14 20 05 09 OE 05 : 


:R 


>11E0 OD 20 OA OF 19 13 14 09 \ 


i Y\m •»•••• 


>11E8 03 OB 21 AA AA AA AA AA 


:R.. !***** 


. 1010 


A9 CF LDA #$CF 




. 1012 


8D 15 FF STA $FF15 




. 1015 


A2 00 LDX #$00 




. 1017 


A9 20 LDA #$20 




. 1019 


9D 00 OC STA $0C00,X 




. 101C 


9D 00 OD STA $0D00,X 




. 101F 


9D 00 OE STA $0E00,X 




. 1022 


9D 00 OF STA $0F00,X 




. 1025 


A9 00 LDA #$00 




. 1027 


9D 00 08 STA $0800, X 




. 102A 


9D 00 09 STA $0900,X 




. 102D 


9D 00 OA STA $0A00,X 




. 1030 


9D 00 OB STA $0B00,X 




. 1033 


CA DEX 




. 1034 


DO El BNE $1017 




. 1036 


AO 12 LDY #$12 




. 1038 


B9 9F 11 LDA $119F,Y 




. 103B 


99 82 OC STA $0C82,Y 




. 103E 


99 2A OF STA $0F2A,Y 
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. 1041 


B9 B2 11 LDA $11B2,Y 


. 1044 


99 D2 0C STA $0CD2,Y 


. 1047 


99 7A OF STA $0F7A,Y 


. 104A 


B9 C5 11 LDA $11C5,Y 


. 104D 


99 C2 OD STA $0DC2,Y 


. 1050 


B9 D8 11 LDA $11D8,Y 


. 1053 


99 62 OE STA $0E62,Y 


. 1056 


A9 26 


LDA #$26 


. 1058 


99 C2 09 STA $09C2,Y 


. 105B 


99 62 OA STA $0A62,Y 


. 105E 


88 


DEY 


. 105F 


10 D7 


BPL $1038 


. 1061 


86 DO 


STX $D0 


. 1063 


86 DB 


STX $DB 


. 1065 


20 8F 10 JSR $108F 


. 1068 


20 Bl 10 JSR $10B1 


. 106B 


A9 FD 


LDA #$FD 


. 106D 


8D 08 FF STA $FF08 


. 1070 


AD 08 FF LDA $FF08 


. 1073 


A2 00 


LDX #$00 


. 1075 


4A 


LSR 


. 1076 


4A 


LSR 


. 1077 


4A 


LSR 


. 1078 


BO 01 


BCS $107B 


. 107A 


CA 


DEX 


. 107B 


4A 


LSR 


. 107C 


BO 01 


BCS $107F 


. 107E 


E8 


I NX 


. 107F 


8A 


TXA 


. 1080 


18 


CLC 


. 1081 


65 DO 


ADC $D0 


. 1083 


C9 F7 


CMP #$F7 


. 1085 


FO El 


BEQ $1068 


. 1087 


C9 09 


CMP #$09 


. 1089 


FO DD 


BEQ $1068 


. 108B 


85 DO 


STA $D0 


. 108D 


DO D9 


BNE $1068 


. 108F 


78 


SEI 


. 1090 


A9 73 


LDA #$73 


. 1092 


8D 14 03 STA $0314 


. 1095 


A9 11 


LDA #$11 


, 1097 


8D 15 03 STA $0315 
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109A 
109C 
109F 
10A1 
10A3 
10A5 
10A7 
10AA 
10AC 
10AF 
10BO 
10B1 
10B3 
10B5 
10B7 
10B9 
10BB 
10BC 
10BE 
10BF 
10C1 
10C3 
10C4 
10C6 
10C8 
10C9 
10CB 
10CD 
10CF 
10D1 
10D3 
10D5 
10D7 
10D9 
10DB 
10DC 
10DE 
10EO 
10E2 
10E3 
10E5 
10E7 



A9 02 
8D OA FF 
A9 00 
85 DA 
85 09 
A9 5A 
8D OB FF 
A9 00 
8D 07 FF 
58 
60 

A5 DB 
FO FC 
A9 00 
85 DB 
A5 D9 
18 

65 DO 
A8 

29 07 
85 D9 
98 

29 08 
DO 01 
60 

A2 05 
A9 OD 
85 02 
85 D4 
A9 09 
85 D6 
85 D8 
A9 90 
85 Dl 
98 

10 31 
AO FF 
A5 Dl 
18 

69 28 
85 Dl 
85 D3 



LDA #$02 
STA SFFOA 
LDA #$00 
STA $DA 
STA $D9 
LDA #$5A 
STA $FF0B 
LDA #$00 
STA $FF07 
CLI 
RTS 

LDA $DB 
BEQ $10B1 
LDA #$00 
STA $DB 
LDA $D9 
CLC 

ADC $D0 
TAY 

AND #$07 
STA $D9 
TYA 

AND #$08 
BNE $10C9 
RTS 

LDX #$05 
LDA #$0D 
STA $D2 
STA $D4 
LDA #$09 
STA $D6 
STA $D8 
LDA #$90 
STA $D1 
TYA 

BPL $110F 
LDY #$FF 
LDA $D1 
CLC 

ADC #$28 
STA $D1 
STA $D3 
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. 10E9 
. 10EB 
. 10ED 
. 10EF 
. 10F1 
. 10F3 
. 10F5 
. 10F7 
. 10F9 
. 10FB 
. 10FC 
. 10FE 
. 1100 
. 1102 
. 1104 
. 1106 
. 1108 
. 1109 
. HOB 
. HOD 
. 110F 
. 1111 
. 1113 
. 1114 
. 1116 
. 1118 
. 111A 
. 111C 
. 111E 
. 1120 
. 1122 
. 1124 
. 1126 
. 1128 
. 112A 
. 112C 
. 112E 
. 1130 
. 1132 
. 1134 
. 1135 
. 1137 



85 D5 
85 07 
90 08 
E6 D2 
E6 D4 
E6 D6 
E6 D8 
E6 D3 
E6 D7 
C8 

Bl D3 
91 Dl 
Bl D7 
91 D5 
CO 27 
DO F3 
CA 
DO D3 

84 DA 
FO 2D 
AO 26 
A5 Dl 
18 
69 28 

85 Dl 
85 D3 
85 D5 
85 D7 
90 08 
E6 D2 
E6 D4 
E6 D6 
E6 D8 

E6 D3 

E6 D7 

Bl Dl 

91 D3 

Bl D5 

91 D7 

88 

10 F5 

CA 



STA $D5 
STA $D7 
BCC $10F7 
INC $D2 
INC $D4 
INC $D6 
INC $D8 
INC $D3 
INC $D7 
I NY 

LDA ($D3),Y 
STA ($D1),Y 
LDA ($D7),Y 
STA ($D5),Y 
CPY #$27 
BNE $10FB 
DEX 

BNE $10DE 
STY $DA 
BEQ $H3C 
LDY #$26 
LDA $D1 
CLC 

ADC #$28 
STA $D1 
STA $D3 
STA $D5 
STA $D7 
BCC $1128 
INC $D2 
INC $D4 
INC $D6 
INC $D8 
INC $D3 
INC $D7 
LDA ($D1),Y 
STA ($D3),Y 
LDA ($D5),Y 
STA ($D7),Y 
DEY 

BPL $112C 
DEX 
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. 1138 


DO D5 


BNE $110F 


. 113A 


86 DA 


STX $DA 


. 113C 


A2 05 


LDX #$05 


. 113E 


A4 DA 


LDY $DA 


. 1140 


A9 OD 


LDA #$0D 


. 1142 


85 D2 


STA $D2 


. 1144 


A9 09 


LDA #$09 


. 1146 


85 D6 


STA $D6 


. 1148 


A9 90 


LDA #$90 


. 114A 


85 Dl 


STA $D1 


. 114C 


85 D5 


STA $D5 


. 114E 


A5 Dl 


LDA $D1 


. 1150 


18 


CLC 


. 1151 


69 28 


ADC #$28 


. 1153 


85 Dl 


STA $D1 


. 1155 


85 D5 


STA $D5 


. 1157 


90 04 


BCC $115D 


. 1159 


E6 D2 


INC $D2 


. 115B 


E6 D6 


INC $D6 


. 115D 


98 


TYA 


. 115E 


49 27 


EOR #$27 


. 1160 


A8 


TAY 


. 1161 


Bl Dl 


LDA ($D1),Y 


. 1163 


85 DC 


STA $DC 


. 1165 


Bl D5 


LDA ($D5),Y 


. 1167 


A4 DA 


LDY $DA 


. 1169 


91 D5 


STA ($D5),Y 


. 116B 


A5 DC 


LDA $DC 


. 116D 


91 Dl 


STA ($D1),Y 


. 116F 


CA 


DEX 


. 1170 


DO DC 


BNE $114E 


. 1172 


60 


RTS 


. 1173 


AD 09 FF LDA $FF09 


. 1176 


8D 09 FF STA $FF09 


. 1179 


AE OB FF LDX $FFOB 


. 117C 


A9 40 


LDA #$40 


. 117E 


EO 83 


CPX #$83 


. 1180 


FO 08 


BEQ $118A 


. 1182 


05 D9 


ORA $D9 


. 1184 


A2 83 


LDX #$83 


. 1186 


86 DB 


STX $DB 


. 1188 


DO 02 


BNE $118C 
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. 118A 


A2 5A LDX #$5A 






. 118C 


8E OB FF STX $FFOB 




. 118F 


29 07 AND #$07 




. 1191 


EC ID FF CPX $FF1D 




. 1194 


FO FB BEQ $1191 




. 1196 


8D 07 FF STA $FF07 




. 1199 


68 


PLA 




. 119A 


A8 


TAY 




. 119B 


68 


PLA 




. 119C 


AA 


TAX 




. 1190 


68 


PLA 




. 119E 


40 


RTI 




>119F 20 04 


09 05 13 05 12 20 : 


,R 


>11A7 14 05 


09 OC 20 08 09 05 : 


,R 




>11AF 12 20 


20 20 20 20 02 OC : 


:R. 




>11B7 05 09 


02 14 20 13 14 05 : 


■ n • • • • • i 




>11BF 08 05 


OE 20 20 20 16 05 j 


f R« • • t 




>11C7 1 


2 13 

!0 04 


03 08 09 05 02 05 : 
01 13 20 08 09 05 : 


;R 




>11CF 2 


\H » • • • i 


>11D7 12 0D 


09 14 20 05 09 OE : 


! n • • • * • i 




>11DF 05 OD 20 OA OF 19 13 14 


In* • • • • 




>11E7 09 03 


OB 21 AA AA AA AA 


:R...!«* 


** 
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2.9 TECHNICAL DETAILS OF TED-CHIP 



In all different modes the TED-Chip 
characters. Each character on the screen 
colours in 8 different brightness levels, 
can be shown flashing. 



displays 25 lines of 40 

can accept 16 different 

r urthermore the characters 



The values in the Video-RAM determine which 
in a certain place. To this belongs a 
supplies colour, brightness and flashing. 



The TED-Chip receives this information 
Colour-RAM. The Video-RAM consists of 1000 
consist of an 8 Bit pointer (see also chap|te 
Register in the TED-Chip determines where 
the memory plan of the C-16. The registers 
in the memory plan of the C-16 from $FF00 
Matrix Register is the TED register 
is: 65280+20=65300 (hex: $FF00+$14 = $4FF14) 
position of the Video-RAM in the C-16's me|tiory 
this register. The TED-Register 20 looks 



as 



Bit: 



Function: VM4 VM3 VM2 VM1 VMO NU NU NU 



NU means "Not Used" and can be ignored 
position of the Video-RAM in the memory, see 
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character is to be shown 
certain attribute which 



from the Video-RAM or 

memory places which each 

r 2.1). The Video Matrix 

the Video-RAM is located in 

of the TED-Chip are found 

(decimal: 65280). The Video 

20, the complete address 

If we want to change the 

we have to manipulate 

follows: 







VM4-VM1 determine the 
the following table: 



VM4-VM1 


Video-RAM 


VM4-VM1 


Video-RAM 


00000 


$0400 


10000 


$8400 


00001 


$0C00 (standard) 


10001 


$8C00 


00010 


$1400 


10010 


$9400 


00011 


$1C00 


10011 


$9C00 


00100 


$2400 


10100 


$A400 


00101 


$2C00 


10101 


$AC00 


00110 


$3400 


10110 


$B400 


00111 


$3C00 


10111 


$BCOO 


01000 


$4400 


11000 


$C400 


01001 


$4C00 


11001 


$CCOO 


01010 


$5400 


11010 


$D400 


01011 


$5C00 


11011 


$DC00 


01100 


$6400 


11100 


$E400 


01101 


$6C00 


11101 


$ECOO 


OHIO 


$7400 


11110 


$F400 


01111 


$7C00 


11111 


$FCOO 



If you possess a C-16 without memory expansion you can in principle 
put your Video-RAM in 8 different positions ($0400...$3COO). Please 
make sure that the Colour-RAM is always installed exactly IK below 
the Video-RAM. If you (as after switching-^n) have the Video-RAM at 
$0C00, the Colour-RAM will be at $0800. 



used 



Each memory place in the Video-Matrix is 
character definition of the corresponding 
(MSB) of this pointer can be interpreted ih 
the RVS-Bit (Bit 7) of TED-Register 7 ($FF07) 
Video-Matrix (VM7) is used to decide whether 
reverse or normal. If VM7 is 0, it is normal 
reverse, whereby the TED-Chip will create 
the hardware . Thus 128 characters can 
RVS-Bit of the TED-Chip is 1, 256 own 
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as a pointer for the 

character. The 8th Bit 

2 different ways. When 

is 0, the MSB of the 

the character should be 

, if it is 1, it is 

the reverse character by 

be user defined. If the 

can be defined. 



characters 



VIDEO MATRIX ADDRESS 



A15 A14 A13 A12 All AlO A9 A8 A7 f\6 A5 



A4 A3 A2 Al AO 



VM4 VM3 VM2 VM1 VMO 1 VC9 VC8 VC7 VC6 VC5 



VC4 VC3 VC2 VC1 VCO 



The Attribute-Memory also consists of 1000 
and contains the Flash-Bit (Bit 7), the bright 
colour (Bit 0-3). The position of the 
also determined by the Video-Matrix-Registe 
equals 0, the Attribute-RAM is always IK be 



ATTRIBUTE ADDRESS 



Consecutive memory places 

ness (Bit 4-6) and the 

Attribute- or Colour-RAM is 

. But since AlO always 

ow the Video-RAM. 



A15 A14 A13 A12 All AlO A9 A8 A7 A6 A5 



A4 A3 A2 Al AO 



VM4 VM3 VM2 VM1 VMO VC9 VC8 VC7 VC6 VC5 



Each character consists of a matrix of 8x8 
ROM as 8 consecutive Bytes. The address of 
determined by CB4-CB0 of the TED-Register 19 
the higher value Bits of the Character-Set-Alddress 



VC4 VC3 VC2 VC1 VCO 



pixels which are stored in 

this character memory is 

($FF13). These Bits are 



A15 A14 A13 A12 All AlO A9 A8 A7 A6 A5 



A4 A3 A2 Al AO 



CB5 CB4 CB3 CB2 CB1 VM7 VM6 VM5 VM4 VM3 VM2 VM1 VMO 



CBO (if RVS-Bit is 1) 
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3.1 MUSIC WITH THE BASIC-COMMANDS 



The Commodore C-16 has simple but good facilities 
It has two independent sound channels 
programmed with the corresponding BASIC 
SOUND (voice, frequency, duration). We dor 
detail about these BASIC commands (for 
would like to show you with a small exampl 
music pieces. for two voices in BASIC. 



of sound creation. 

wjhich can be very easily 

commands VOL (volume) and 

't want to go into too much 

s you have the manual), but 

e how to programme small 



100 VOL 8 

110 DIM Nl%(66),N2%(66),Dl%(66),D2%(66) 

120 1=0 

130 READ N1S(I),D1%(I): IF N1X(I)<0 THEN 150 

140 1=1+1: GOTO 130 

150 T1=I :I=0 

160 READ N2%(I),D2%(I): IFN2%(I) <0 THEN 180 

170 1=1+1 : GOTO 160 

180 Il=-1 :I2=-1 

190 IF Dl > THEN 220:ELSE SOUND 1,N1,0 

200 11=11+1: IF II < Tl THEN D1=D1%(I1):N1 

210 IF N1>0 THEN SOUND 1,N1,300 

220 IF D2>0 THEN 250: ELSE SOUND 2,N2,0 

230 12=12+1 : D2=D2SS(I2) : N2=N255(I2) 

240 IF N2>0 THEN SOUND 2,N2,300 

250 D1=D1-1:D2=D2-1 

260 FOR 1=1 TO 80: NEXT I : GOTO 190 

270 VOL 

280 DATA 0,1,685,1,770,1,810,1 

290 DATA 798,1,685,1,798,1,834,1 

300 DATA 810,2,854,2,755,2,854,2 

310 DATA 770,1,685,1,770,1,810,1 

320 DATA 798,1,685,1,798,1,834,1 

330 DATA 810,2,770,2,0,4 

340 DATA 0,1,854,1,810,1,854,1 

350 DATA 770,1,810,1,685,1,739,1 

360 DATA 704,2,770,2,834,2,864,2 

370 DATA 864,1,834,1,798,1,834,1 

380 DATA 739,1,798,1,643,1,704,1 
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=N1%(I1):ELSE 270 



390 DATA 685, 


,2, 


,739, 


,2,810,2,254,2 


400 DATA 854, 


.1, 


,810, 


,1,770,1,810,1 


410 DATA 704, 


.2, 


,834, 


,2,834,1,798,1 


420 DATA 739, 


► 1. 


,798, 


,1,685,2,810,2 


430 DATA 810, 


1. 


,770, 


,1,704,1,770,1 


440 DATA 643, 


,2, 


,798, 


,2,810,6 


450 DATA -1,- 


-1 






460 DATA 7,2, 


516,4, 


,485,2 


470 DATA 516, 


1, 


,345, 


,1,516,1,596,1 


480 DATA 571, 


>li 


,345, 


,1,571,1,643,1 


490 DATA 596, 


,2, 


,516, 


,2,485,2,345,2 


500 DATA 516, 


,1, 


,345, 


,1,516,1,596,1 


510 DATA 571, 


pi) 


,345, 


,1,571,1,643,1 


520 DATA 596, 


»2, 


,516, 


,2,596,2,516,2 


530 DATA 643, 


-lj 


,516, 


,1,383,1,516,1 


540 DATA 262, 


4, 


,383, 


,,1,7,1,169,1 


550 DATA 118, 


»2, 


,262, 


,2,453,2,571,2 


560 DATA 571, 


1, 


,453, 


,1,345,1,453,1 


570 DATA 169, 


Ji 


,345, 


,1,118,1,118,1 


580 DATA 7, 


.2, 


,169, 


,2,262,2,383,1 


590 DATA 118, 


,1 


,262, 


,1,118,2,118,2 


600 DATA 169, 


»1- 


,345, 


,1,7,1,169,1 


610 DATA 7 j 


,2 


,7,2 




620 DATA 118, 


,1 


,453 


,1,383,1,453,1 


630 DATA 596, 


.6 






640 DATA -1,- 


-1 







EXPLANATION LINE BY LINE 



100 
110 
120 
130 

140 



Volume on max. 

Dimension data fields 

I counts the number of notes 

Key note and duration for first 
figure means: Ready! 



voice in; a negative 



Increment counter I and continue. 
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150 

160 

170 
180 
190 
200 

210 
220 

230 

240 
250 
260 

270 



Tl Is the total number of notes 
back to 0. 



for voice 1. Put I 



Key In note and duration for 
figure means: Ready! 



voice 2 ; a negative 



Increment counter I and continue 



II and 12 are pointers for the data fields. 



When voice 1 is ready, go to 220 \ otherwise stop voice 1 

Increment pointer of voice 1. Wh^n ready, leave loop; 
otherwise put note and duration. 



If no pause, start note. 

When voice 2 is ready go to 250; 
2. 

Increment pointer of voice 2 and 
ration. 



If it is no pause start note. 

Decrement duration. 

Wait a short while. In this line 
notes shorter or longer. 

Switch volume off. 



otherwise stop voice 



put note and du- 



280-440 Data for voice 1. 



450 



End of data for voice 1, 



460-630 Data for voice 2. 



640 



End of data for voice 2. 



you can play all 
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3.2 THE SOUND REGISTERS OF TED 



The Sound Registers are on the same chip as the Graphic Registers in 
TED. Because of the simple sound possibilities, only 5 registers are 
required which have the following functions: 



FUNCTION 



ADDRESS 


BITS 


$FF0E 


0-7 


$FF0F 


0-7 


$FF10 


0-1 


$FF11 


0-3 




4 




5 




6 




7 


$FF12 


0-1 



Low Byte of voice 1 frequency 



H H ii 



ii 2 



Top 2 Bits of voice 1 



Volume 



Select voice 1 (0=off 



ii ii 2 " •' 



frequency 



,l=on) 



ii it 



" noise for voice 2 (0=off,l=on) 
Sound switch (0=on,l:=off) 



Top 2 Bits of voice 2 frequency 



In order to create a sound, choose first the voice or voices and the 
volume with register $FF11. Normally you set Bit 7 of this register 
to 1 for no sound. Next you choose the frequencies which you should 
note that Bits 2-7 of register $FF12 are used for other purposes and 
must not be changed. Now you can switch on the sound with Bit 7 of 
$FF11 and or switch it off. 
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3.3 INTERRUPT PROGRAMMED MUSIC 



In this chapter we would like to investigate 
creating music on the C-16 which does not 
This kind of background music is often fotjnd 
practical to concentrate on the game and 
automatic background music can be created 
you perhaps know there is a so-called Interrupt 
second in the C-16. This is a short interrupt 
during which the C-16 does routine tasks 
been pressed. We can use this interrupt so 
other tasks also actuates the relevant 
facilitate things, it is best you key in 
see for yourself. There will be a more derailed 
program in the next pages. 



the possibility of 

interfere with the rest. 

in games and it is very 

not on the music. This 

very easily on the C-16. As 

every 1/60 th of a 

of the normal program 

J|ike checking if any key has 

that C-16 besides doing 

sound parameters. To 

following program and 

explanation of this 



the 



100 FOR 1=1536 TO 1536+173 

110 : READ A 

120 : POKE I, A 

130 : C=C+A 

140 NEXT I 

150 IF C023952 THEN PRINT "ERROR": STOP 

160 FOR 1=1712 TO 1712+119 STEP 3 

170 : READ A,B 

180 : POKE I, A : POKE I+l,B-(INT(B/256)*25,6) 

190 : POKE I+2,INT(B/256) 

200 : D=D+A+B 

210 NEXT I 

220 IF DO34808 THEN PRINT "ERROR" :ST0P 

230 POKE 208,176 : POKE 209,6 

240 VOL 7 : SYS 1536 

250 : 

260 DATA 120,169,36,141,20,3,169,6,141,21 

270 DATA 141,254,4,88,96,120,169,14,141, 

280 DATA 88,96,255,0,173,252,4,201,255,240 

290 DATA 162,0,177,208,149,210,200,232,13^ 

300 DATA 2,133,208,144,2,230,209,165,210, 

310 DATA 24, 144, 216, 201, 254, 208, 19, 165, 208 

315 DATA 133,213,165,211,133,208,165 
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.20 



3,169,255,141,252,4 
,3,169,206,141,21,3 
,3,76,14,206,160,0 
,201,3,208,245,165,208,105 
£01, 255, 208, 6, 32, 21, 6 



320 DATA 
325 DATA 
330 DATA 
340 DATA 
350 DATA 
360 DATA 
370 : 
380 DATA 
390 DATA 
400 DATA 
410 DATA 
420 DATA 
430 DATA 
440 DATA 



209,133,214,165,212,133,209,24,144 

196,201,253,208,11,165,213 

133,208,165,214,133,209,24,144,181 

41,240,5,211,141,17,255,24,144,164 

255, 141,254, 4, 173, 18,255,41, 252,5,^12,141, 18,255, 165,211 

141,14,255,173,17,255,9,16,141,17,255,24,144,162 



,201,252,208,13,173,17,255 
73,255,141,252,4,169 



254,1727,254,1796,254,1796,254,1727,254,1712 
20,685,20,739,40,739,20,685,20,643 40,596,20,643,20,685 
20,739,20,685,80,643,20,685,20,739 40,739 
20,685,20,643,40,596,20,643,20,685 20,643 
20,596,80,596,253,0 

20,770,20,810,40,810,20,796,20,739,40,770 
20,770,20,810,20,798,20,739,80,770,253,0 



MACHINE CODE PROGRAM 



0600 
0601 
0603 
0606 
0608 
060B 
060D 
0610 
0613 
0614 
0615 
0616 
0618 
061B 
061D 
0620 
0621 
0622 
0623 
0624 
0627 
0629 
062B 
062E 



78 

A9 24 

8D 14 03 

A9 06 

8D 15 03 

A9 FF 

8D FC 04 

8D FE 04 

58 

60 

78 

A9 OE 

8D 14 03 

A9 CE 

8D 15 03 

58 

60 

EA 

EA 

AD FC 04 

C9 FF 

FO 03 

4C OE CE 

AO 00 



SEI 

LDA #$24 
STA $0314 
LDA #$06 
STA $0315 
LDA #$FF 
STA $04FC 
STA $04FE 
CLI 
RTS 
SEI 

LDA #$0E 
STA $0314 
LDA #$CE 
STA $0315 
CLI 
RTS 
NOP 
NOP 

LDA $04FC 
CMP #$FF 
BEQ $062E 
JMP $CEOE 
LDY #$00 
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. 0630 A2 00 


LDX #$00 


. 0632 Bl DO 


LDA ($DO),Y 


. 0634 


95 D2 


STA $D2,X 


. 0636 C8 


INY 


. 0637 E8 


INX 


. 0638 


8A 


TXA 


. 0639 


C9 03 


CMP #$03 


. 063B 


DO F5 


BNE $0632 


. 063D A5 DO 


LDA $D0 


. 063F 


69 02 


ADC #$02 


. 0641 


85 DO 


STA $D0 


. 0643 


90 02 


BCC $0647 


. 0645 E6 Dl 


INC $D1 


. 0647 


A5 D2 


LDA $D2 


. 0649 C9 FF 


CMP #$FF 


. 064B 


DO 06 


BNE $0653 


. 064D 20 15 06 JSR $0615 


. 0650 


18 


CLC 


. 0651 


90 D8 


BCC $062B 


. 0653 C9 FE 


CMP #$FE 


. 0655 


DO 13 


BNE $066A 


. 0657 


A5 DO 


LDA $D0 


. 0659 


85 D5 


STA $D5 


. 065B 


A5 D3 


LDA $D3 


. 065D 


85 DO 


STA $D0 


. 065F 


A5 Dl 


LDA $D1 


. 0661 


85 D6 


STA $D6 


. 0663 


A5 D4 


LDA $D4 


. 0665 


85 Dl 


STA $D1 


. 0667 


18 


CLC 


. 0668 


90 C4 , 


BCC $062E 


. 066A 


C9 FD 


CMP #$FD 


. 066C 


DO OB 


BNE $0679 


. 066E 


A5 D5 


LDA $D5 


. 0670 


85 DO 


STA $D0 


. 0672 


A5 D6 


LDA $D6 


. 0674 


85 Dl 


STA $D1 


. 0676 


18 


CLC 


. 0677 


90 B5 


BCC $062E 


. 0679 


C9 FC 


CMP #$FC 


. 067B 


DO OD 


BNE $068A 


. 067D AD 11 FF LDA $FF11 
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. 0680 29 F0 AND #$F0 

. 0682 05 D3 ORA $03 

. 0684 8D 11 FF STA $FF11 

. 0687 18 CLC 

. 0688 90 A4 BCC $062E 

. 068A 49 FF EOR #$FF 

. 068C 8D FC 04 STA $04FC 

. 068F A9 FF LDA #$FF 

. 0691 8D FE 04 STA $04FE 

. 0694 AD 12 FF LDA $FF12 

. 0697 29 FC AND #$FC 

. 0699 05 D4 ORA $D4 

. 069B 8D 12 FF STA $FF12 

. 069E A5 D3 LDA $D3 

. 06A0 8D OE FF STA $FF0E 

. 06 A3 AD 11 FF LDA $FF11 

. 06A6 09 10 ORA #$10 

. 06 A8 8D 11 FF STA $FF11 

. 06AB 18 CLC 

. 06AC 90 A2 BCC $0650 



Our interrupt-player's syntax is relatively simple: The volume level 
and length are stored. Additionally some Bytes have special 
functions: 

$FC (252) Volume. The volume within a piece can be changed. The 
Low-Byte of the frequency contains the new volume to 8. The 
High-Byte is not used. 

$FD (253) This is a kind of GOSUB-command. It branches off to the 
address which is given instead of the frequency. Furthermore the old 
address is stored to allow a return of the sub-program. 

$FE (254) This is the RETURN-command which finishes a sub program. 
The two frequency Bytes have to be there but are not used. 

$FF (255) End of sequence. 
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4.1 INTRODUCTION TO MACHINE CODE 



If you want to really master your computer ( who want's it to be the 
other way round), you cannot avoid programming in computer language 
(MACHINE CODE). The nice thing is actually the tremendous speed and 
unlimited control over the hardware possibilities of the computer. 



what often frightens the B ASIC-Programmer is the alleged complexity 
of Machine Code and the fact that when you make a mistake, the 
computer can crash. This, however, never causes lasting damage. Even 
an absolute beginner can write small routines in machine code with 
the integrated machine code monitor within a short period of time. 
This introduction should, with a few examples help to inspire some 
experimenting. 



WHAT IS MACHINE CODE 



The heart of C 16 is a Micro-Processor (7501) which can follow a 
series of commands. These commands are similar to those of a 
programmable calculator (TI, HP, etc.). The programmer has the 
following at his disposal: a calculating register (accumulator), 2 
Index-Registers (X-Register and Y-Register) and the 16384 bytes of 
memory in the C-16. Many memory places of the C-16 have a certain 
function which you have to know as a Machine Code Programmer. 
Therefore the knowledge of a Memory Map is indispensable (see chapter 
4.4). The memory places in the C-16 can only accept values between 
and 255 (try from BASIC: POKE 82,256 or similar). A no. in a memory 
space can be a machine Code command which is understood by the 
processor and carried out, or some other data; this has to be decided 
by the user. You don't have to remember which figure denotes which 
machine code command, this is done by the integral Mini-Assembler in 
the built-in Machine CODE Monitor of the C-16. You only have to 
remember the so called Mnemonics, which are memory aids with 3 
letters for the individual computer commands. From this the Assembler 
generates the values between and 255 and stores them in the memory. 
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4.2 EXAMPLES OF THE MOST IMPORTANT COMMANDS 



1. The commands LDA and STA, the first program 



Let's assume the C-16's frame colour is to: be changed to black. In 
BASIC you could either use the COLOUR-Command or transfer the value 
directly into the background register of the Video-Chip with a 
POKE-Command. The BASIC-Line would be: 

1 COLOR 4,1,0 

or: 

1 POKE 65305,0 

Let's now programme the last line in machine language instead of 
BASIC. First you have to know where the machine program should run or 
stored (e.g. called with: SYS 818). The Cassette-Buffer (at 
$0332-03F2 or 818-1010) is suitable for our little demonstrations 
because it is only used during a cassette operation. 



If you want to poke into memory space 65k)5 you have to obtain a 
first. For this you can use the command LDA which means load 
accumulator. The value, in this case with which the computer 
register is to be loaded is put directly after the command in the 
memory. In machine language this is shown |)y a # sign followed by the 
required figure. To inform the Mini-Assembler that it is a 
hexa-decimal number (it cannot use any others), you have to put a $ 
in front of every number and it has to be & two figure number. The 
complete command now reads: LDA #$00. Now ydu have the value in the 
accumulator and have to store it in memory location 65305 (hex. 
$FF19). To do this, command STA can be used (STore Accumulator). The 
required address has to follow, i.e. STA $FF19. Finally you have to 
go back to BASIC with the command RTS (Re Turn Subroutine) :RTS. 
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In order to programme this small routine (and the following demos) 
into the C-16, type the BASIC command: MONITOR. When you enter a 
machine code proramme, you must always use; CAPITAL letters only and 
end each line with the RETURN key. 



MONITOR (RETURN) 



The screen will display. 



MONITOR 



PC SR AC XR YR SP 



; 3AB3 00 00 00 00 F9 



Now Type 



A 0332 LDA #$00 



A 0334 STA $FF19 



A 0337 RTS 



A 0338 



(RETURN) 
(RETURN) 
(RETURN) 
(RETURN) 
(RETURN) 



READY. 



Since our program ends with the RTS-command we can leave the 
Mini- Assembler. When it shows: A 0338, simply press RETURN and leave 
the machine code monitor by typing X (RETURN). 

You can now start your first machine code program with the command: 
SYS 818. If you haven't given up yet you can look at the programming 
of a loop in the next chapter. 
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2. A PERMANANT LOOP (INC, JMP) 



If you wanted to change the frame colour continually, you would have 
to write the following program in BASIC: 



1 FOR 1=0 TO 127 

2 : POKE 65305,1 

3 NEXT I 

4 GOTO 1 



In order to change the frame colour, you can always increment the 
content of memory space 65305 by one. Use command: INC address 
(INCrement). This command increments the contents of address by one. 
If the memory space is full (>255), it automatically reverts to zero 
again. Our first command is: INC $FF19. Since we want to increment 
the content of $FFJ.9 always by one we have to jump back to this 
command. For this, we can use the command JMP address (JuMP). As our 
program is to start at $0332, the second (and last) line reads: JMP 
$0332. Once again, type MONITOR to enter monitor and type the 
following: 



A 0332 INC $FF19 
A 0335 JMP $0332 



With: SYS 818 you will see the first effect which cannot be realised 
in BASIC. 

Since there is no program end, so you cannot return with RTS into 
BASIC and will have to use the RESET key. 
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3. DECEISION LOOP (LDX,DEX,BNE,NOP) 

The example above is now to be extended byj a time loop. In order to 
programme a time loop, we can for example ', 

1. Set a counter to certain no. 

2. Decrement counter by one 

3. Check if the counter is 

4. If not, repeat the process until 0. 

The time taken by computer to do this is ja time loop and is very 
short. The program first must have a counter and secondly make a 
deceision if the counter is zero. 



For this purpose one of the two Index-Registers (X or Y) 
useful. The content can be between and 25^5 (hex. $FF). 



come in 



Our program is to start again with the command: INC $FF19, i.e. it is 
to increment the frame colour by one. Nextt, the Index-Register X, 
which we want to decrement is loaded with tjhe start value similar to 
the LDA-command with: LDX address; in our cjase: LDX #$B1, where LDX 
means LoaD X register. Decrementing the X-Fjegister by one is simple 
and is done with the command DEX (DEcjrement Xregister). After 
decrementing we have to check whether the ^-Register has reached 0. 
For this we use the command: BNE (Branch Not Equal). BNE tests 
whether the previous machine command (DEX) has set a certain Flag, 
the ZERO-Flag. This flag is set (=1) when XJ reg. contains a after 
DEX operation. If not, the program jumps ba^k to the address after 
BNE: BNE $0337 i.e. it jumps back to the command DEX and forms a 
loop. 



In order to wait a short while the command 
utilised. At the end of our program we 
beginning, i.e. JMP $0332. The complete program 



MOP (No Operation) can be 

want to start from the 

looks now as follows: 



A 0332 INC $FF19 



A 0335 LDX #$B1 



A 0337 DEX 
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A 0338 BNE $0337 

A 033A NOP 

A 033B JMP $0332 

Try the program with: SYS 818. 

Instead of the X-Register, the Y-Register dan also be used. Instead 
of LDX, use LDY (LoaD Yregister) and DEY (DEcrement Yregister) 
Instead of DEX. 



4. USING THE OPERATING SYSTEM (JSR) 



If the machine program is to talk to the outside world e.g. operate 
printer or show information on the screen, the easiest way to do this 
is to use the existing routines in the operating system of the C-16. 
A summary and an operating instruction of tjhese KERNAL-Routines can 
be found in chapter 4.4 of this book. As| an example, erase the 
machine code from the screen. In BASIC this| would look as follows: 

1 PRINT CHR$(147) 

This routine, which brings a character from the current cursor 
position to the screen, begins in the operating system at address 
$FFD2 (hex.) and requires the ASCII-Value of the character to be 
printed in the accumulator. We obtain the character with the familiar 
LDA command for the accumulator and call the routine with the command 
JSR (Jump Subroutine). The Kernel sub routine has all the 
instructions needed to print the character in the accumulator on the 
screen. You can therefore effectively us^ Kernel routines to do 
mundane tasks like adding, subtracting etcj. The program for erasing 
the screen in machine code is. 
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A 0332 LDA #$93 
A 0334 JSR $FFD2 
A 0337 RTS 

With SYS 818 you can now erase the screen. 



5. PRINT MESSAGE (TABLE ADDRESSING) 



If you want to print more than one character on the screen it is best 
to programme a loop which refers to a table. The next character will 
be obtained automatically from the table. The end of the table should 
contain a zero, so that your program knows where to finish the loop. 

The table can accessed by the command LDA address, X. This command 
loads the accumulator with the CONTENTS of memory address indexed by 
X register. The value in the X-Register plus the value of the address 
equals the memory address from which the contents are loaded into the 
accumulator- e.g. LDA $0341, X. If X=2, then the ace. will be loaded 
with contents of mem. addr. $0343. If a zero (the self -defined end of 
the table) is loaded into the accumulator, another Flag (the 
ZERO-Flag) is set which can be tested with the command: BEQ address 
(Branch if EQal). The value in the X-Register can be changed with DEX 
or INX (INcrement Xregister) in order to be able to call the next 
address with another LDA address, X. 



A 0332 LDX #$00 
A 0334 LDA $0341, X 
A 0337 BEQ $0340 
A 0339 JSR $FFD2 
A 033C INX 
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A 033D JMP $0334 



A 0340 RTS 



The above routine loaded the ace. with the! contents of mem. addr. 
$0341, which in our case is letter H. As i{ is not 0, it jumped to 
sub routine at $FFD2. The X reg. is incremented by 1 and loops back 
to get the contents of address $0341+1 i.e., $0342. The contents are 
$41 (E). It carries on like this until it loads the contents of mem. 
addr. $0347 and finds it to be 0. It sets a flag, and the routine 
jumps to RTS. 



To enable us to key in the table with the required message we type 

into the monitor the command: M 0341, which has the effect of a hexa 

decimal print out of the memory location from $0341 onwards. We move 

with the cursor to the first memory location and key in the hexa 
decimal ASCII values of our message. Our message is to be HELLO, the 
corresponding ASCII values are: 48 41 4C 4C 4F. After you have typed 

these figures (don't forget to press RETURN) the screen should look 
as follows (your input in bold type): | 



M0341 



>0341 48 41 4C 4C 4F 00 00 00 : HELLO 



Leave the machine code monitor with: X (RETfURN), erase screen with 
the CLEAR-key and test your program with: S^YS 818. 



6. INDIRCT ADDRESSING 



In the following example, we want to fill 
hearts. In BASIC the program would look as 



the whole screen with 
follows: 



1 FOR 1=3072 TO 4071 



2 : POKE 1,83 
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3 NEXT I 



Watch the speed and compare later to our corresponding M/C program. 

Writing on a larger area in machine code is best done with indirect 

addressing; the use of a certain memory locations is carried out with 
the commands: 

LDA (pointer ),Y 

STA (pointer ),Y 

The content of addressed pointer plus the content of the Y-Register 
equals the address from which a figure is loaded into the accumulator 
(LDA) or where it will be stored (STA). 



The "Pointer" consists of two consecutive memory locations, each 
address is less than 256. As you know the contents of a single memory 
location can only accept values between and 255. The computer has, 
however, 65535 possible memory locations. Therefore the required 
address has to be divided into two parts. The lower one is stored in 
the first of the two memory locations, the higher one in the 
following. After that the command can be used, see the following 
program: 

The value $53 is stored into video RAM (screen) whose start address 
is $0C00 + Y. Y is inc. by 1 until Y=256($FF) and $53 is stored from 
$0C00 to $0CFF. The Y reg. becomes as 1 is added to $FF and the 
prog jumps to RTS. 

A 0332 LDY #$00 

A 0334 LDA #$00 

A 0336 STA $D0 

A 0338 LDA #$0C 

A 033A STA $D1 

A 033C LDA #$53 

Page 63 



A 033E ST A ($DO),Y 



A 0340 INY 



A 0341 BNE $033E 



A 0343 RTS 



After call-up with SYS 818, 256 hearts will be printed on the screen. 
As only a block of 256 can be written on, in order to write the next 
block, you have to increment the upper byte of pointer by one and 
repeat the process. Since the screen memory is IK long and IK 
consists of 4 blocks, the above loop has to be repeated 4 times. The 
X-Register can be used as counter. 



Change the above program as follows: 



A 033E LDX #$04 



A 0340 STA ($D0),Y 



A 0342 INY 



A 0343 BNE $0340 



A 0345 INC $D1 



A 0347 DEX 



A 0348 BNE $0340 



A 034A RTS 



The four blocks are - $0C00-$0CFF, $pD00-$0DFF, $0E00-$0EFF, 
$0F00-$0FE7. INC $D1 increments the contends of $D0 by 1 i.e. from 
$0C to $0D. The X reg. acts as a loop counter. 



Make sure that the program was programmed | correctly (with monitor 
command: D 0332 034A). Return to BASIC and jtry it with SYS 818. If 
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everything is o.k. the speed will surely convince you of the speed of 
M/C programming. For comparison: our BASIC program requires for this 
task approx. 5.9 seconds, the M/C program approx. 16 Milli-seconds 
(=16/1000 seconds); i.e. it is in this case 370 times faster than the 
corresponding BASIC-program! 



7. SUB-ROUTINES (JSR, RTS) 



You can write small sub routines to do mundane tasks i.e. move a 
sprite X a no. of pixels. You can then call this routine from main 
prog, whenever you need it. The sub routine must have RTS, so that 
the prog, returns to the next instruction in the main prog.. The 
command is JSR address. This was already used for printing a message 
on the screen. The return from this routine is done with the command 
RTS (ReTurn from Subroutine). This does not jump back into BASIC but 
to the next address after JSR address. 



Erasing the screen can also look as follows: 

A 0332 JSR $0336 

A 0335 RTS 

A 0336 LDA #$93 

A 0338 JSR $FFD2 

A 033B RTS 

You can now test your first sub- routine with the familiar SYS 818. 



8. COMPARISON COMMANDS (CMP,CPX,BCC,BCS) 

Often the content of certain memory addresses has to be compared with 
constants or the contents of other memory locations. This is 
automatically done with the ZERO Flag when comparing to ZERO (see 
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paragraph 3). When comparing something else you have to use one of 
the comparison commands CMP (CoMPare accu.), CPY (ComPare Yregister) 
or CPX (ComPare Xregister). 

After the command it needs to know, what to compare it with. With the 
# sign, the contents of the corresponding processor register are 
compared with the indicated number. Without the # sign, with the 
contents of the addressed memory location. 

If the contents of the accumulator are greater or equal to the 
indicated number or the contents of the addressed mem. location, a 
certain flag, the CARRY Flag, is set to 1. On equality the ZERO Flag 
is set to 1 and on unequality to 0. 

If the contents of the accumulator are less, the CARRY-Flag is set to 
0. 

CARRY ZERO 



Acc> or = Ind. No. 


1 





Ace. = Ind. No. 





1 


Acc.< or = Ind. No. 









The information in the Flags can now be used by the branching 
commands: 



BNE Branch if Not Equal — Zero Flag 

BEQ Branch if Equal " " 

BCC Branch if Carry Clear — Carry Flag 
BCS Branch if Carry Set " " 

Here is an example to test branching: 

A 0332 LDA #$F1 
A 0334 CMP $FF19 
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A 0337 BCC $033C 
A 0339 INC $FF19 
A 033C RTS 



As long as the ace. is less than or equal to the contents of $FF19, 
CARRY flag is 0, the program loops back changing the frame colour. 



A further example of a comparison test: 

A 0332 LDX $0C00 

A 0335 CPX #$01 

A 0337 BEQ $0340 

A 0339 BCS $0341 

A 033B LDA #$00 

A 033D STA $FF19 

A 0340 RTS 

A 0341 LDA #$F1 

A 0343 STA $FF19 

A 0346 RTS 



If an A is shown in the top left screen corner, the program doesn't 
do anything, it jumps immediately back into BASIC. Characters with a 
larger code switch the frame to white, the smaller ones (§) to black. 



Anybody who has reached this stage and tried all examples and even 
modified a bit can be sure to enjoy the Assembler-Programming. For 
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more thorough introduction to Machine Code programming, you should 
study some of many books publihed on the subject. We can recommend 
the book "Programming the 6502" by Rodney Zaks, published by SYBEX 
publishers (the 6502 has exactly the same Command set as the 7501 in 
the C-16), as well as many other books which deal with the 6502. The 
next chapter will give you a good idea of all the commands of the 
6502/7501. And now: keep up your courage!!! 
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A Few More Tips For Beginners 



Machine language is best learnt by studying other machine language 
programs. Such programs are published in magazines. Familiarise 
yourself with the program even if it refers to a different computer 
but uses the Micro-Processor 6502 (or 6510). Make sure, you 
understand the code. This requires persistence, specially if it deals 
with a technique unknown to you. This can plrove extremely tiresome but 
with enough patience you will be the winner. 



Once you have looked at other machine language programs, you have to 
start writing some of your own. They can bfe utility programs for your 
BASIC-programs or a pure machine language program. Remember : 
Practice makes perfect! 



You should also use the routines available in the computer in a 
program which helps you to write, prepare and check machine programs. 
An example is KERNAL (see chapter 4.4) which allows keyboard scan, 
text display, control of peripherals such as cassette player, disc 
drives, printer, etc.. KERNAL is extremely powerful and its usage is 
highly recommended. 
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THE COMMANDS OF THE 7501 -PROCESSOR 



The integral Micro Processor 7501 in the C-16 is a further 
development of series 6502 (Atari, Applej PET, VC-20) and 6510 
(C-64). It is therefore fully software \ compatible to them and 
possesses exactly the same command set4 This facilitates the 
re-writing of programs of these computers! tremendously. The only 
difference is the different programming df input/output (Floppy, 



Cassette), graphics or sound. If you have a 



C-64 you can consult our comparison table ir| chapter 4.6 



program for the Commodore 



For all beginners, as an introduction and for all advanced 
programmers for consultation, we now list alphabetically all commands 
of the 7501 (6502/6510 resp.). A detailed description of each 
individual command would be too elaborate fpr this book. For this 
purpose there are already enough books in thje bookshops. 



The list shows the command and a short cescription, the way of 

addressing, the assembler language format, the OPC-Code, the no. of 

Bytes and clock cycles (+ signifies that, defending on memory pages, 
1 or 2 more cycles are used). 



COMMAND Description Addressing 



Assembler 
Format 



Op No. Of No. Of 
Code Bytes Cycles 



H- 



ADC Add To Ace, 
With Carry 



Immediate ADC #0peranc^ 

Zero Page ADC Operanoj 

Zero Page,X ADC Operand 

Absolute ADC Operand 

Absolute, X ADC Operand 

Absolute, Y ADC Operand 

( Indirect, X) ADC (Operand 

( Indirect, Y) ADC (Operand 



69 
65 
75 
6D 
7D 
79 
,X) 61 
,Y) 71 



,X 



2 
2 
2 
3 
3 
3 
2 
2 



2 

3 

4 

4 

4+ 

4+ 

6 

5+ 
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AND Logical AND 
To Accumulator 

Immediate AND #0perand 29 2 

Zero Page AND Operand 25 2 

Zero Page,X AND Operand, X 35 2 

Absolute AND Operand 2D 3 

Absolute, X AND Operand, X 3D 3 

Absolute, Y AND Operand, Y 39 3 

( Indirect, X) AND (Operand, X) 21 2 

(Indirect, Y) AND (Operand, Y) 31 2 



BMI Branch On 
Result Minus 



2 

3 

4 

4 

4+ 

4+ 

6 

5+ 



ASL 


Accumulator 
Shift Left 


















Accumulator ASL 


A 


OA 


1 


2 






Zero Page 


ASL 


Operand 


06 


2 


5 






Zero Page,X ASL 


Operand, X 


16 


2 


6 






Absolute 


ASL 


Operand 


OE 


3 


6 






Absolute, X 


ASL 


Operand, X 


IE 


3 


7 


BCC 


Branch On 
Carry Clear 


















Relative 


BCC 


Operand 


90 


2 


2+ 


BCS 


Branch On 
Carry Set 


















Relative 


BCS 


Operand 


BO 


2 


2+ 


BEQ 


Branch On 
Result = 


















Relative 


BEQ 


Operand 


FO 


2 


2+ 


BIT 


Test Mem. 
Bits 


















Zero Page 


BIT 


Operand 


24 


2 


3 






Absolute 


BIT 


Operand 


2C 


3 


4 



Relative BMI Operand 



30 



2+ 



Page 71 



BNI Branch On Result 
Not Equal to 

Relative BNE Operad DO 2 



2+ 



BPL Branch On 
Result Plus 



Relative BPL Operand 10 



BRK Force 
Break 



Implied BRK Operand 00 



BVC Branch On 
Overflow Clear 



Relative BVC Operand 50 



2+ 



CLC Clear Carry 
Flag 



Implied CLC 



18 



CLD Clear Decimal 
Mode 



Implied CLD 



D8 



CLI Clear IRQ Int. 
Disable Bit 



Implied CLI 



58 



CLV Clear Overflow 
Flag 



Implied CLV 



B8 



CMP Compare Mem. 
And Ace. 



Immediate CMP #Operand C9 
Zero Page CMP Operand C5 
Zero Page,X CMP Operand ,X D5 
Absolute CMP Operand CD 
Absolute, X CMP Operand^ DD 
Absolute, Y CMP Operand^ 09 
(Indirect, X) CMP (Operand,X) CI 
(Indirect,Y) CMP (Operand^) Dl 



2 


2 


2 


3 


2 


2 


3 


4 


3 


4+ 


3 


4+ 


2 


6+ 


2 


5+ 
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CPX Compare Mem. 
And Index X 



Immediate CPX tfOperano" EO 2 
Zero Page CPX Operand E4 2 
Absolute CPX Operand EC 3 



EOR Exclusive OR 
Mem. With Ace. 



Immediate EOR #Operan^i 49 2 

Zero Page EOR Operand 45 2 

Zero Page,X EOR Operand, X 55 2 

Absolute EOR Operand 4D 3 

Absolute, X EOR Operand 5D 3 

Absolute, Y EOR Operand 59 3 

( Indirect, X) EOR (Operand ),X 41 2 

( Indirect ),Y EOR (Operand ),Y 51 2 



2 
3 

4 



CPY 


Compare Mem. 
And Index Y 


















Immediate 


CPY 


#Operand 


CO 


2 


2 






Zero Page 


CPY 


Operand 


C4 


2 


3 






Absolute 


CPY 


Operand 


CC 


3 


4 


DEC 


Decrement Mem 
By One 


• 
















Zero Page 


DEC 


Operand 


C6 


2 


5 






Zero Page,X 


: DEC 


Operand, X 


D6 


2 


6 






Absolute 


DEC 


Operand 


CE 


3 


6 






Absolute, X 


DEC 


Operand, X 


DE 


3 


1 


DEX 


Decrement 
Index X By 1 


















Implied 


DEX 




CA 


1 


2 


DEY 


Decrement 
Index Y By 1 


















Implied 


DEY 




88 


1 


2 



2 

3 

4 

4 

4+ 

4+ 

6 

5+ 
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INC Increment Mem. 
By One 



Zero Page INC Operand E6 2 

Zero Page,X INC Operand, X F6 2 

Absolute INC Operand EE 3 

Absolute, X INC Operand, X FE 3 



JMP Jump To 
An Address 



Absolute JMP Operand 4C 3 
Indirect JMP (Operand) 6C 3 



5 
6 
6 
7 



INX Increment Index 










X By One 










Implied 


INX 


E8 


1 


2 


INY Increment Index 










Y By One 










Implied 


INY 


C8 


1 


2 



3 
5 



JSR Jump To 
Sub-Routine 



Absolute JSR Operand 20 



6 



LDA 



Load Ace. 
With Mem. 



Immediate 
Zero Page 
Zero Page,X 
Absolute 
Absolute,X 
Absolute, Y 
(Indirect, X) 
( Indirect ),Y 



LDA #Operand A9 2 

LDA Operand A5 2 

LDA Operand, X B5 2 

LDA Operand AD 3 

LDA Operand, X BD 3 

LDA Operand, Y B9 3 

LDA (Operand, X) Al 2 

LDA (Operand ),Y Bl 2 



2 
3 

4 

4 

4+ 

4+ 

6 

5+ 



LDX Load X Reg. 



Immediate LDX #Operand A2 2 

Zero Page LDX Operand A6 2 

Zero Page,Y LDX Operand, Y B6 2 

Absolute LDX Operand AE 3 

Absolute, Y LDX Operandi BE 3 



2 
3 
4 
4 
4+ 
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LDY Load Y Reg. 



Immdiate LDY #0perand AO 2 

Zero Page LDY Operahd A4 2 

Zero Page,X LDY Operahd, X B4 2 

Absolute LDY Operand AC 3 

Absolute, X LDY Operahd, X BC 3 



PLA Get Ace. 

From Stack 



2 

3 
4 
4 
4+ 



LSR 


Shift 1 Bit 
Right 














Accumulator LSR 


A 


4A 


1 


2 




Zero Page 


LSR 


Operahd 


46 


2 


5 




Zero Page,X 


LSR 


Operand, X 


56 


2 


6 




Absolute 


LSR 


Operand 


4E 


3 


6 




Absolute, X 


LSR 


Operahd, X 


5E 


3 


7 


NOP 


No Operation 
















NOP 










ORA 


Logical OR Ace. 
With Mem. 














Immediate 


ORA 


#0perand 


09 


2 


2 




Zero Page 


ORA 


Operand 


05 


2 


3 




Zero Page,X 


ORA 


Operand, X 


15 


2 


4 




Absolute 


ORA 


Operand 


OD 


3 


4 




Absolute, X 


ORA 


Operand, X 


ID 


3 


4+ 




Absolute, Y 


ORA 


Operand, Y 


19 


3 


4+ 




( Indirect, X) 


ORA 


(Operand, X) 01 


2 


6 




(Indirect), Y ORA (Operand), V 


' 11 


2 


5+ 


PHA 


Push (Store) 
Ace. In Stack 














Immediate 


PHA 




48 


1 


3 


PHP 


Store Status 
Word in Stack 














Immediate 


PHP 


»........—.._.._-.- 


08 


1 


3 



PLA 



68 
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PLP Get Prog. Sta. 
Word From Stack 



PLP 



28 



ROL Rotate Left 



Accumulator ROL A 

Zero Page ROL Operand 

Zero Page,X ROL Operand, X 

Absolute ROL Operand 

Absolute, X ROL Operand, X 



2A 


1 


2 


26 


2 


5 


36 


2 


6 


2E 


3 


6 


3E 


3 


7 


6A 


1 


2 


66 


2 


5 


16 


2 


6 


6E 


3 


6 


7E 


3 


7 



ROR Rotate Right 



Accumulator ROR A 

Zero Page ROR Operand 

Zero Page,X ROR Operand, X 

Absolute ROR Operand 

Absolute, X ROR Operand, X 



RTI Return From 
Interrupt 



Implied RTI 



40 



RTS Return From 
Sub-Routine 



Implied RTS 



40 



SBC Subtract From 
Ace. With Carry 



Immediate SBC #Operand! 

Zero Page SBC Operand 

Zero Page,X SBC Operand, X 

Absolute SBC Operand 

Absolute, X SBC Operand!, X 

Absolute, Y SBC Operand, Y 

( Indirect, X) SBC (Operand, X) El 

( Indirect ),Y SBC (Operand), Y Fl 



E9 


2 


2 


E5 


2 


3 


F5 


2 


4 


ED 


3 


4 


FD 


3 


4+ 


F9 


3 


4+ 


El 


2 


6 


Fl 


2 


5+ 
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SEC Set Carry 

Flag 



Implied SEC 



38 



SED 


Set Decimal 
Mode 
















Implied SED 




F8 


1 


2 


SEI 


Set IRQ 
Disable Bits 
















Implied SEI 




78 


1 


2 


STA 


Store Ace. 














In Memory 


Zero Page STA Operancji 
Zero Page,X STA Operand, X 
Absolute STA Operand 
Absolute, X STA Operand, X 
Absolute, Y STA Operand, Y 
( Indirect, X) STA (Operand, X) 
(Indirect), Y STA (Operandi), Y 


85 
95 
8D 
9D 
99 
81 
91 


2 

2 
3 
3 
3 
2 
2 


3 
4 
4 
5 
5 
6 
6 


STX 


Store X Reg. 














In Memory 


Zero Page STX 
Zero Page,Y STX 
Absolute STX 


Operand 
Operand, Y 
Operand 


86 
96 

tit 


2 
2 
3 


3 
4 
4 


STY 


Store Y Reg. 














In Memory 


Zero Page STY 
Zero Page,X STY 
Absolute STY 


Operancji 
Operancji, X 
Operand 


84 
94 
8C 


2 
2 
3 


3 
4 
4 


TAX 


Transfer Ace, 


• 












To X Reg. 


Implied TAX 


.-.__— -—.-i.—*-- 


AA 


1 


2 



TAY Transfer Ace. 
To Y Reg. 



Implied 



TAY 



A8 
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TSX Transfer Stack 
Pointer To X REG 

Implied TSX BA 1 

TXA Transfer X Reg. 
To Ace. 

Implied TXA 8A 1 

________________ _____ ___________ ____________ ______ «»«._ .-__* 

TXS Transfer X Reg. 
To Stack Pointer 

Implied TXS 9a 1 

TYA Transfer Y Reg. 
To Ace. 

Implied TYA 98 1 
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4.4 THE USE OF KERNAL-ROUTINES 



There is one question which worries all programmers : What to do if 
the manufacturer changes the computer operating system? Lengthy 
machine language programs possibly won't function properly without 
extensive modifications. In order to reducp this problem, Commodore 
has developed a principle to ease the programmer's lot. This is the 
so called KERNAL. Essentially KERNAL is a standard jump table for 
input, output and memory management programs in the operating system. 
If the system program is improved or modified, the location of the 
individual programs in ROM can change, but the KERNAL jump table is 
also altered accordingly. 

KERNAL is the operating system of the Commodore 16. All inputs, 
outputs and the memory controls are controlled by the KERNAL. 
There are 39 input/output routines and other very useful utilities 
which can be accessed via the table. Using these, you not only save 
time but can also adapt your programs from one Commodore computer to 
the other. In the C-16, the jump table is on the last page of the 
memory in ROM ($FF49-FFF5). 



To use the KERNAL jump table, first you set up th parameters that the 
KERNAL routines needs to work. Then you jump to the suitable position 
in the KERNAL jump table using JSR instruction. After finishing the 
routine, KERNAL transfers the control to your m/c program. 
Depending on the KERNAL-Routine used, parameters are returned to your 
program in certain registers. You will firjd the relevant registers 
for the individual KERNAL routine in the description of the KERNAL 
subroutine. 



KERNAL FUNCTIONS ON POWER UP OR RESET 



1) After switching on the power the Stack Pointer is initially set to 
0, and the decimal mode is erased. 



2) Then KERNAL checks if a ROM with auto start (e.g. a game 
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cartridge) is available at address $8000 (d£c. 32768). If it is, the 
normal initialisation is interrupted and the control transferred to 
the program stored in ROM. If not, then the normal system 
initialisation is continued. 



3) Next KERNAL initialises all input/output facilities. The serial 
bus is initialised, the cassette motor switched off and the TED Chip 
is loaded with the default values. 



4) Now KERNAL checks, if the STOP key is pressed. If yes, it branches 
to the machine language monitor. 



5) As the next step KERNAL carries out a RAM test and sets the RAM 
Pointers at the top and the bottom. Also th$ Zero Page is initialised 
and the cassette buffer prepared. 



6) Finally KERNAL carries out the following routines: The I/O 
Vectors are set to default values. The screen erased and all screen 
editor variables set to zero. Then the BASIC} Interpreter is started 
at $8000. 



WORKING WITH KERNAL 



When writing programs in machine code, it is; often convenient to use 
operating system routines. These consist of input/output, access to 
the system clock, memory management and simillar functions. It is a 
waste of time to write them yourself as it is so easy to access the 
operating system. It helps to speed up the programming too. 



In order to work with a KERNAL routines, fii)st you have to make all 
the necessary preparations. If, for examplje, a routine initially 
requires the call up of another KERNAL routijne, then you have to call 
this first. If the routine requires a number; in the accumulator, then 
this number must be there. If the conditions are not fulfilled then 
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the routines cannot work properly. 

After carrying out all preparations you cajl the routine via the JSR 
command. All accesible KERNAL routines are; structured sub routines 
with RTS. When the KERNAL routine has finished its task, the control 
is returned to your program at the instruction after the JSR. 



Many KERNAL routines return error codes in the status word or 
accumulator when faults occur. If you want! to program well and create 
acceptable machine programs these fault | indicators must not be 
ignored. 



That's all there is in using the KERNAL. Tl)REE steps. 

1) Set Up 

2) Call Routine 

3) Error Handling 



The following conventions are used for the description of KERNAL 
routines: 



NAME: Name of KERNAL routine. 

PURPOSE: Short description of purpose of tHe KERNAL routine. 

ADDRESS: This is the call address of the KERNAL routine in hexa 
decimal. 

TRANSFER: Registers under this heading arje used for transferring 
parameters to and from KERNAL routines. 

PREPARATION: Certain KERNAL routines require a data to be setup 
before they can operate. They may also require calling of other 
KERNAL routines beforehand. 
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ERRORS: A return from KERNAL routine with the CARRY Flag set 
indicates that an error was encountered. The accumulator contains the 
error no.. 

STACK REQUIREMENT: This is the actual no of stack bytes used by the 
KERNAL routine. 

REGISTER: All registers used by the KERNAL routine are listed here. 

DESCRIPTION: Here you will find a short description of the functions 
of the KERNAL routine. 

PROCEDURE: How to use the routine. 

EXAMPLE: Illustrates operation with a smalJJ example. 
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NAME: ACPTR 



PURPOSE: Get data from the serial bus 

ADDRESS: $FFA5 

TRANSFER: A 

PREPARATION: TALK, TKSA 

ERRORS: See READST 

STACK REQUIREMENT: 13 

REGISTER: A, X 



Description : 



This routine is used to receive data from £ device on the serial bus, 
e.g. a disc drive. This routine gets a dat£ byte directly from the 
serial bus. This data is transferred to the accumulator. As 
preparation, the TALK routine has to be caJLled to command the device 
on the serial bus to send data on bus. If the input device needs a 
secondary command, it must be sent using | the KERNAL routine TKSA 
before calling this routine. ERRORS are returned in the status word. 
Use READST routine to read the status wordf 

PROCEDURE: 

1) Command the device on the serial bus to 1 prepare to send data to 
the C-16. (Use KERNAL routines TALK and TK$A.) 

2) Call this routine (via JSR). 

3) Use or store data. 



EXAMPLE: 

$1010 ;Fetch a byte from bus 

$1010 20 A5 FF JSR ACPTR 

$1013 85 DO STA DATA 
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NAME: CHKIN 

PURPOSE: Open a channel for input 

ADDRESS: $FFC6 

TRANSFER: X 

PREPARATION: (OPEN) 

ERRORS: 

STACK REQUIREMENT: None 

REGISTER: A, X 

Description: 



Each logical file that has already been opejied by the KERNAL routine 

OPEN can be defined as an input channel by | this routine. Naturally 

the device has to be an input device otherwise an error will occur 
and the routine will abort. ! 

If the data is not via the keyboard, this routine has to be called 
before usin CHRIN or GETIN. If the input is via the keyboard and no 
other input channels are open, then this routine and the OPEN routine 

are not required. j 

i 

If this routine is used with a device on the serial bus, it 
automatically sends the talk address via the bus and the secondary 
address, if one was specified by the OPEN routine. 



Page 84 



PROCEDURE: 

1) Open logical file. 

2) Load register X with the number of logical file to be used. 

3) Call this routine (with JSR). 

Possible Errors: 

#3 : File not open \ 

#5 : Device Not Present. 

#6 : File is not an input file. 

EXAMPLE: 

$1010 ; Preparation for input 

i 

$1010 ;From logical file 2 

i 

$1010 A2 02 LDX #2 

i 

$1012 20 C6 FF 3SR CHKIN 
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NAME: CHKOUT 

PURPOSE: Open a channel for output 

ADDRESS: $FFC9 

TRANSFER: X 

PREPARATION: (OPEN) 

FAULT INDICATION: 0, 3, 5, 7 (see READST) 

STACK REQUIREMENT: 4+ 

REGISTER: A, X 

Description: 



A logical file number created by the KERNAL routine OPEN can be 
defined as an output channel. Naturally it has to be an output device 
otherwise an error will occur and the routine will be aborted. 

Before data can be sent to an output devipe you have to call this 

routine unless you want to use the screen of the C-16 as an output 

device. If so and no other output channel are defined, then this 
routine and the OPEN routine are not needed. 

When opening the channel for serial bus this routine automatically 
sends the LISTEN address specified by the OPEN routine (and possibly 
also a secondary address). 
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Procedure: 



1) Use the KERNAL OPEN routine to specify a logical file no, a listen 
address and a secondary address (if required). 

2) Load register X with the logical file number used in the OPEN 
command . 

3) Call this routine (via JSR). 



Possible Errors: 

#3 : Fil not open 

#5 : Device Not Present. 

#7 : NoT an output file. 

EXAI^LE: 

$1010 A2 03 LDX #3 ; Define logical file 3 
$1012 20 C9 FF JSR CHKOUT ;as output channel 
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NAME: CHRIN 

PURPOSE: Get A Character From Input. 

ADDRESS: $FFCF 

TRANSFER: A 

PREPARATION: (OPEN, CHKIN) 

ERRORS: (see READST) 

STACK REQUIREMENT: 7+ 

REGISTER: A, X 

Description: 



This routine will get a data byte from the channel already set up as 
the input channel by the KERNAL CHKIN. If CHKIN was not used to 
define another input channel, a keyboard input is expected. The data 
byte is returned in the accumulator. After calling, the channel 
remains open. 

Inputs with the keyboard are dealt in a special way. First the cursor 
is switched on and flashes until a CR (Carriage Return) is typed. All 
characters in one line (max. 88 characters) are stored in the BASIC 
input buffer. These characters can be received one at a time by 
calling this routine for each individual character. When "Carriage 
Return" is retrieved, the whole line has been processed. When this 
routine is called again, the procedure is repeated, i.e. flashing of 
the cursor. 



Procedure (from the keyboard): 



1) Call this routine (Use JSR). 
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2) Retrieve a data byte by calling this routine 

3) Store Data Byte 

4) Check, if it Ii the last data byte (is it a CR?). 

5) If not, go to step 2. 



EXAMPLE: 



$1010 A2 00 



LDY #$00 ; prepare Y Register 



$1012 20 CF FF JSR CHRIN 



$1015 99 DO STA DATA,Y ; store data 



$1018 C8 



I NY 



$1019 C9 13 



CMP #CR 



;Is it a "Carriage Return"? 



$101B DO F5 



BNE $1012 ; No, fetch next byte 



Procedure (From Other Devices): 



1) Use KERNAL routines OPEN and CHKIN. 



2) Call this routine (via JSR). 



3) Store data. 



EXAMPLE: 



$1010 20 CF FF 



JSR CHRIN 



$1013 8D FO 



STA DATA 
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NAME: CHROUT 



PURPOSE: Output A Character 

ADDRESS: $FFD2 

TRANSFER: A 

PREPARATION: (CHKOUT, OPEN) 

ERRORS: (see READST) 

STACK REQUIREMENT: 8+ 

REGISTER: A 

Description: 



This routine will output a character to an already open channel. Use 
the KERNAL OPEN and CHKOUT routines to set up the output channel 
before calling this routine. If this call is omitted, data will be 
sent to default output device (3, screen). The data byte to be sent 
is loaded in the accumulator and this routine called. The data is 
then sent to the stipulated output device. After call the channel 
remains open. 

Be careful if this routine is used for data transfer to a serial 
device, since data will be sent to all open output channels on the 
bus. If you do'nt want it to happen, all output channels of serial 
bus , apart from the required channel, have to be closed with KERNAL 
routine CLRCHN. 



Procedure: 



1) If necessary use KERNAL routine CHKOUT (see above), 
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2) Load data to be sent into accumulator. 



3) Call this routine. 



EXAMPLE: 



$1010 



;Replace BASIC command:CMD 4,"A M ; 



$1010 A2 04 



LDX #4 



; Logical File #4 



$1012 20 C9 FF JSR CHKOUT ;0pen output channel 



$101 



(\9 41 



LDA #"A" 



$1017 20 D2 FF JSR CHROUT ;Send character 
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NAME: CIOUT 



PURPOSE: Output A Byte Over a Serial Bus 

ADDRESS: $FFAB 

TRANSFER: A 

PREPARATION: LISTEN, (SECOND) 

ERRORS: see READST 

STACK REQUIREMENT: 5 

REGISTER: None 

Description: 



This routine is used for information transfer to devices on serial 
bus. By calling this routine a data byte is transferred to serial bus 
with full serial Handshake. Before calling this routine, LISTEN has 
to be called to command a device on serial bus to get ready to 
receive data. (If a secondary address is required, it has to be sent 
using KERNAL routine SECOND.) 

The accumulator is loaded with a Byte which is sent as data via the 
serial bus. A device has to be ready for data receipt, otherwise the 
status word will show "Timeout". This routine buffers one character 
i.e holds the previous character to be sent back. If you call KERNAL 
routine UNLSN to end data transfer,, the buffered character is sent 
with EOI. Then the command UNLSN is sent to the device. 
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Procedure: 

1) Use KERNAL routine LISTEN (and possibly SECOND). 

2) Load one Data Byte in the accumulator. 

3) Call this routine to send the data byte. 



EXAMPLE: 

$1010 A9 58 LDA #"X" ;Send an X to serial bus 
$1012 20 A8 FF JSR CIOUT 
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NAME: CINT 



PURPOSE: Initialise Screen Editor And TED chip 

ADDRESS: $FF81 

TRANSFER: None 

PREPARATION: None 

ERRORS: None 

STACK REQUIREMENT: 4 

REGISTER: A, X, Y 



Description: 



This routine initialises TED Chip in the Commodore 16. Also the 
KERNAL screen editor is initialised. This routine can be called via a 
program module of the C-16. 



Procedure: 



1) Call this routine. 



EXAMPLE: 




$1010 20 81 FF 


JSR CINT 


$1013 20 00 20 


JMP RUN 



; Initialise TED chip 
; Start main program 
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NAME: CLALL 



PURPOSE: Close All Files 
ADDRESS: $FFE7 
TRANSFER: None 
PREPARATION: None 
ERROR : None 
STACK REQUIREMENT: 11 
REGISTER: A, X 

Description: 



This routine closes all open files, the pointers in the open file 
table are reset and all files closed. The routine CLRCHN will be 
automatically called for resetting the input/output channels. 



Procedure: 



1) Call this routine. 



EXAMPLE: 



$1010 20 E7 FF JSR CLALL ; Close all data banks and 
$1013 ;Reset I/O channels 

$1015 20 00 20 JMP RUN ; Start main program 
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NAME: CLOSE 



PURPOSE: Closing a logical file 

ADDRESS: $FFC3 

TRANSFER: A 

PREPARATION: None 

ERRORS: 0, 240 (see READST) 

STACK REQUIREMENT: 2+ 

REGISTER: A, X, Y 

Description: 



This routine is used for closing a logical file after all 
inputs/outputs operations on the file are finished. The routine is 
called after the accumulator is loaded with the logical file number. 
It is the same number which was used on opening the file with the 
OPEN routine. 



Procedure : 

1) Load accumulator with the number of the logical file to be closed 

2) Call this routine. 
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EXAMPLE: 

$101 ° ;Close channel 15 

$1010 A9 OF LDA #15 

$1012 20 CC FF JSR CLOSE 
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NAME: CLRCHN 



PURPOSE: Clear Input/Output Channels 

ADDRESS: $FFCC 

TRANSFER: None 

PREPARATION: None 

ERRORS : 

STACK REQUIREMENT: 9 

REGISTER: A, X 



Description: 



This routine is called to clear all open channels and restore the 
input/output channels to their default values. Normally it is called 
after opening other input/output channels (e.g. Cassette or Disk) and 
using them for I/O operations. The default input device no. is 
(keyboard) and the default output device is 3 (screen). 

If one of the channels to be closed is the serial port, an UNTALK 
signal is sent first to clear the 0/P channel or an UNLISTEN is sent 
to clear the output channel. If this routine is not called (and all 
connected devices on the serial bus stay active) then several units 
can receive the same data from the Commodore 16 at the same time. One 
way to take advantage of this would be for the printer to TALK and 
for disk to listen. In this way a disk data file can be printed 
directly. 

When using the KERNAL routine CLALL, this routine will be called-up 
automatically. 
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Procedure: 



1) Call this routine via the JSR-instruction. 



EXAMPLE: 



$1010 20 CC FF JSR CLRCHN 
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NAME: GETIN 



PURPOSE: Get A Character From The Keyboard 

ADDRESS: $FFE4 

TRANSFER: A 

PREPARATION: CHKIN, OPEN 

ERRORS: see READST 

STACK REQUIREMENT: 7+ 

REGISTER: A (X,Y) 



Description: 



The routine takes a character from the keyboard queue and transfers 
it as an ASCII value to the accumulator. If the queue is empty, the 
value is loaded in the accumulator. Characters are put in the queue 
automatically by an interrupt driven keyboard scan routine which 
calls routine SCNKEY. A maximum of 10 characters can be stored in the 
keyboard memory. If the memory is full then additional characters are 
ignored until at least one character has been removed from the queue. 

If RS-232 0/P is used then only register A is used and a single 
character quoted. For checking see READST. If the 0/P is the serial 
bus, the cassette or the screen, call the BASIN-routine. 
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Procedure: 



1) Call this routine with a JSR-instruction. 

2) Check, if a is stored in the accumulator (empty memory), 

3) Process data. 



EXAMPLE: 

$1010 ; Wait for a character 

$1010 20 E4 FF JSR GETIN 

$1013 C9 00 CMP #0 

$1015 FO F9 BEQ $1010 
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NAME: IOBASE 



PURPOSE: Define I/O Memory Page 

ADDRESS: $FFF3 

TRANSFER: X, Y 

PREPARATION: None 

ERROR : 

STACK REQUIREMENT: 2 

REGISTER: X, Y 



Description: 



This routine sets the X and Y registers to the address of the memory 
section where the memory mapped I/O devices are located. This address 
can then be used, together with relative addresses to access the 
memory mapped I/O devices of the Commodore C-16. Register X contains 
the lower order address byte and register Y the upper order address 
byte. 

With this routine the compatibility between the VC-20, the C-64 and 
the C-16 is guaranteed. If the input/output registers for a machine 
code program are set by calling this routine, they will also be 
compatible with future versions of the Commodore C-16 with regard to 
KERNAL and BASIC. 
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Procedure : 

1) Call this routine with the JSR-instruction. 

2) Store registers X and Y in consecutive positions. 

3) Load the Y register with the offset 

4) Access the input /output location. 



EXAMPLE: (only PLUS/4) 

$1010 ;Data direction register of User-Port on 

$1010 20 F3 FF JSR IOBASE 

$1013 86 DO STX POINT ;Place BASIS-register 

$1015 84 Dl STY POINT+1 

$1017 A2 02 LDY #2 

$1019 A9 00 LDA #0 ; Offset for DDR of User-Port 

$101B 91 DO STA (POINT ),Y;Put DDR on 
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NAME: IOINIT 



PURPOSE: Initialise I/O Devices 

ADDRESS: $FF84 

TRANSFER: None 

PREPARATION: None 

ERROR : 

STACK REQUIREMENT: None 

REGISTER: A,X,Y 

Description: 



With this routine all input/output devices and routines are 
initialised. It is normally called as part of the initialising 
program module of the Commodore 16. 



Procedure : 



1) Call this routine with JSR 



EXAMPLE: 



$1010 20 84 FF JSR IOINIT 
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NAME: LISTEN 



PURPOSE: Command A Device To Listen 

ADDRESS: $FFB1 

TRANSFER: A 

PREPARATION: None 

ERROR : see READST 

STACK REQUIREMENT: None 

REGISTER: A 



Description : 



This routine commands a device on serial bus to receive data. A 
device number between and 31 is loaded into the accumulator before 
calling this routine. LISTEN will OR the number bit by bit to convert 
to a LISTEN address. The addressed device will then go into listen 
mode and be ready to accept data. 
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Procedure: 



1) Load the accumulator with the number of device commanded to 
listen. 

2) Call this routine with JSR. 



EXAMPLE: 

$1010 ;Unit no. 8 on LISTEN 

$1010 A9 08 LDA #8 

$1012 20 Bl FF JSR LISTEN 
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NAME: LOAD 



PURPOSE: Load RAM From Device 
ADDRESS: $FFD5 
TRANSFER: A,X,Y 
PREPARATION: SETLFS, SETNAM 
ERRORS: 0,4,5,8,5, READST 
STACK REQUIREMENT: None 
REGISTER: A,X,Y 



Description: 



This routine directly loads data byte from an input device into the 
memory of the Commodore 16. It can also be used for comparing data 
from a device with the data in the memory while the data stored in 
RAM remains unchanged (VERIFY). 

Accumulator is set to for loading or to 1 for VERIFY. If input 
device was OPENed with a secondary address of 3, the header will be 
ignored. In that case registers X and Y must contain the start 
address for loading. If secondary address 1, or 2 are selected, the 
data will be loaded into the memory from the position specified by 
the header. This routine returns the address of the highest RAM 
location which was loaded. 

Before calling this routine KERNAL routines SETLFS and SETNAM have to 
be called-up. 

A LOAD with keyboard (0), RS-232 (2) or screen (3) is not possible. 
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Procedure: 



1) Call SETLFS and SETNAM. If a relocated load is required, use 
routine SETLFS to send the secondary address 0. 

2) Load ace. with for LOAD or 1 for VERIFY. 

3) If loading is to relocated address, registers X and Y must be set 
to the start address for the load. 

4) Call this routine using the JSR-instruction. 



EXAMPLE: 



$1010 



;Load a program from cassette 



$1010 A9 01 LDA #DEVICE1 



;Set device no. 



$1012 A2 00 LDX "FILENO 



;Set logical file no. 



$1014 AO 00 LSY CMD1 



;Set secondary address 



$1016 20 BA FF JSR SETLFS 



$1019 A9 OC LDA #NAME1-NAME ;Load ace. with no. Of 



$1019 



; characters in file name 



$101B A2 32 LDX #<NAME 



;Load X and Y with address 



$101D AO 10 LDY #>NAME 



;of program name ($1032) 



$101F 20 BD FF JSR SETNAM 



$1022 A9 00 LDA #0 



;Set Flag for load 
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$1024 A2 FF LDX #$FF 



; Default start 



$1026 A0 FF LDY #$FF 



$1028 20 D5 FF JSR LOAD 



$102B 86 2D STX VARTAB 



;End address of program 



$102D 84 2E STY VARTAB+1 



$102F 4C 00 20 JMP START 



$1032 50 52 4F .BYT "FILE NAME" 



$1035 47 52 41 



$1038 4D 4D 4E 



$103B 41 4D 45 
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NAME: MEMBOT 



PURPOSE: Set Bottom Of Memory 

ADDRESS: $FF9C 

TRANSFER: X, Y 

PREPARATION: None 

ERROR : None 

STACK REQUIREMENT: None 

REGISTER: X, Y 



Description: 



This routine is used to set the bottom memory pointer. If, on call up 
of this routine, the accumulator carry bit is set then the pointer to 
the bottom RAM byte is returned in registers X and Y. The pointer 
start value of the Commodore C-16 without additional memory expansion 
is $1000 (4096 decimal). If the accumulator carry bit is on call up 
of this routine, then the values of registers X and Y are transferred 
to the low and high bytes of the pointer to the start of RAM. 



Procedure: (Read the bottom of RAM): 

1) Set carry flag 

2) Call this routine 
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Procedure (Set the bottom of memory): 



1) Clear the carry flag 



2) Call this routine 



EXAMPLE 



$1010 



5 Move bottom of memory 
; up 1 page (256 Bytes) 



$1010 38 



SEC 



;Read memory bottom 



$1011 20 9C FF JSR MEMBOT 



$1014 E8 



INY 



$1015 18 



CLC 



;Set memory bottom to new value 



$1016 20 9C FF JSR MEMBOT 
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NAME: MEMTOP 



PURPOSE: Setting pointer to the top of memory 



ADDRESS: $FF99 



TRANSFER: X, Y 



PREPARATION: None 



ERRORS: None 



STACK REQUIREMENT: 2 



REGISTER: X, Y 



Description: 



This routine is used to set the top of RAM. If, on call up of this 
routine, the carry bit is set, then the pointer to the top of RAM is 
loaded into registers X and Y. If the accumulator carry bit is clear 
on call up of this routine then the contents of the registers X and Y 
are loaded in the top memory pointer, changing the top of memory. 

EXAMPLE: 



$1010 



; Release RS-232 Buffer 



$1010 38 



SEC 



$1011 20 99 FF JSR MEMTOP 



;Read memory top 



$1014 88 



DEX 



$1015 ia 



CLC 



$1016 20 99 FF JSR MEMTOP ;Set new top of memory 
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NAME: OPEN 



PURPOSE: Opening A Logical File 
ADDRESS: $FFCO 
TRANSFER: None 
PREPARATION: SETLFS, SETNAM 
ERRORS: 1,2,4,5,6,240,READST 
STACK REQUIREMENT: None 
REGISTER: A, X, Y 

Description: 



This routine is used to open a logical file. After opening a logical 
file, it can be used for I/O operations. This routine is called by 
most KERNAL input/output routines to create the relevant logical data 
files. No parameters are required setting, but KERNAL routines SETLFS 
and SETNAM have to be called beforehand. 



Procedure : 

1) Use routine SETLFS. 

2) Use routine SETNAM. 

3) Call this routine. 
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EXAMPLE: 



$1010 



$1010 



$1010 A9 02 LDA #NAME1-NAME 



$1012 A2 25 LDX #<NAME 



$1014 A0 10 LDY #>NAME 



This routine simulates the BASIC 



command: OPEN 15,8,15,"I0" 
Length of file name (2) 



Address of file name in 



X and Y Reg. ($1025) 



$1016 20 BD FF JSR SETNAM 



$1019 A9 OF LDA #15 



$101B A2 08 LDX #8 



$101D AO OF LDY #15 



$101F 20 BA FF JSR SETLFS 



$1022 20 CO FF JSR OPEN 



$1025 49 30 .BYT "10" 
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NAME; PLOT 



PURPOSE: Read/Set Cursor Position 

ADDRESS: $FFF0 

TRANSFER: A,X,Y 

PREPARATION: None 

ERRORS: None 

STACK REQUIREMENT: 2 

REGISTER: A,X,Y 



Description: 



If accumulator carry flag is set when this routine is called, then 
the present cursor position on the screen (in X and Y coordinates) is 
returned in registers X and Y. X is the row number (0-24) of the 
cursor position, Y the column number (0-39). If on call, the carry 
bit is clear, the cursor moves to the position X, Y (according to 
registers X and Y). 



Procedure (reading cursor position): 

1) Set carry flag 

2) Call this routine 

3) Read X and Y positions from registers X and Y resp. 
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Procedure (placing cursor position): 



1) Clear carry flag 

2) Write required cursor position in registers X and Y. 



3) Call this routine. 



EXAMPLE: 



$1010 



;Place cursor in 



$1010 



;row 10, column 5 



$1010 A2 OA LDX #10 



$1012 AO 05 LDY #5 



$1014 18 



CLC 



$1015 20 FO FF JSR PLOT 
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NAME: RAMTAS 



PURPOSE: RAM Test 
ADDRESS: $FF87 
TRANSFER: A,X,Y 
PREPARATION: None 
ERRORS: None 
STACK REQUIREMENT: 2 
REGISTER: A,X,Y 



Description: 



With this routine, RAM is tested and the top/bottom memory pointers 
set. Also the memory locations $0000 - $0101 and $0200 - $07FF are 
cleared. Furthermore the cassette buffer is initialised and the 
screen start positioned at $0C00. Normally this routine is called as 
part of the power on module of the Commodore 16. 



Procedure: 



1) Call this routine. 



EXAMPLE: 



$1010 20 87 FF JSR RAMTAS 
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NAME: RDTIM 



PURPOSE: Read system clock 
ADDRESS: $FFDE 
TRANSFER: A,X,Y 
PREPARATION: None 
ERROR : None 
STACK REQUIREMENT: 2 
REGISTER: A,X,Y 



Description: 



This routine is used to read the system clock. The clock resolution 
is 1/60 s. This routine returns 3 bytes. The accumulator contains the 
most significant byte, the X-register the next significant byte and 
the Y-register the least significant Byte. 



Procedure : 



1) Call this routine. 
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EXAMPLE: 

$1010 20 DE FF JSR RDTIM 

$1013 84 DO STY TIME 

$1015 86 Dl STX TIME+1 

$1017 85 D2 STA TIME+2 
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NAME: READST 



PURPOSE: Read Status Word 
ADDRESS: $FFB7 
TRANSFER: A 
PREPARATION: None 
ERRORS: None 
STACK REQUIREMENT: 2 
REGISTER: A 



Description: 



This routine returns the current status of the I/O devices in the 
accumulator. Normally this routine is called after new communication 
to an I/O device. It gives you information about device status or 
errors which occurred during input /output. 

The bits transferred to the accumulator contain the following 
information: 
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ST 


ST 


READ 


SERIAL 


BIT 


NUMB. 


FROM 


READ/ 


ISITION 


1 VALUE 


CASSETTE 


WRITE 



TAPE LOAD/VERIFY 







Write 
Timeout 



Read 
Timeout 



Short Block 



Short Block 



3 8 Long Block 



Long Block 



16 Unrecoverable 
Read Error 



Unrecoverable 
Read Error 



32 



Checksum 
Error 



Checksum 
Error 



64 End Of file End of line 



128 Tape end 



Device not 
present 



End Of Tape 
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Procedure: 

1) Call this routine. 

2) Decode program information in registre A. 



EXAMPLE: 

$1010 ; Check for file-end 

$1010 ; during reading 

$1010 20 B7 FF JSR READST 

$1013 49 40 AND #64 ;Test for EOF (End Of File) 

$1015 DO 25 BNE EOF ;Branch when placed 
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NAME: RESTOR 



PURPOSE: Reset normal status of system 

ADDRESS: $FF8A 

PREPARATION: None 

ERROR : None 

STACK REQUIREMENT: 2 

REGISTER: A,X,Y 



Description: 



This routine restores the default values of all system vectors used 
in KERNAL and BASIC routines and Interrupts are reset. The individual 
system vectors can be read and prepared with KERNAL- routine VECTOR. 



Procedure: 



1) Call this routine. 



EXAMPLE: 



$1010 20 8A FF JSR RESTOR 
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NAME: SAVE 



PURPOSE: Transfer RAM Contents To A DEVICE 

ADDRESS: $FFD8 

TRANSFER: A,X,Y 

PREPARATION: SETLFS, SETNAM 

ERRORS: 5,8,9,READST 

STACK REQUIREMENT: None 

REGISTER: A,X,Y 



Description: 



This routine saves a section of memory. The memory is saved from an 
indirect address in the zero page given in the accumulator to the 
fixed address in registers X and Y. Before calling this routine, the 
routines SETLFS and SETNAM must be called. Saving on device 1 
(cassette), file name is not necessary (Though recommended). If you 
try to save on a different device without file name, an error will 
result. 



It is not possible to save on device (keyboard), 2 (RS-232) and 3 
(screen), as an error will occur and the routine aborted. 



Procedure: 



1) User routines SETLFS and SETNAM (if not to be saved on tape 
without file name.) 
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2) Load two consecutive locations of zero page with the pointer to 
the start of save (as a standard in the 7501 the lower Byte comes 
first and then the higher Byte). 

3) Load address of pointer in zero page in the accumulator. 

4) Load low and high byte respetively of end address of save in 
registers X and Y. 

5) Call this routine. 



EXAMPLE: 



$1010 A9 01 



; Device 1 (cassette) 



$1012 20 BA FF JSR SETLFS 



$1015 A9 00 



LDA #0 



;No name 



$1017 20 BD FF JSR SETNAM 



$101A A9 00 



LDA START 



;Load start address ($3000) 



$101C 85 2B 



STA TXTTAB 



;(L0W BYTE) 



$101E A9 3C 



LDA START+1 



$1020 85 2C 



STA TXTTAB+1 ;(HIGH BYTE) 



$1022 A2 00 



LDX END+1 



;Load end address ($4000) (LOW) 



$1024 AO 40 



LDY END+1 



;(HIGH BYTE) 



$1026 A9 2B 



LDA TXTTAB ;Load ace. with zero page addr. 



$1029 20 D8 FF JSR SAVE 
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NAME: SCNKEY 



PURPOSE: Keyboard Scan 
ADDRESS: $FF9F 
TRANSFER: None 
PREPARATION: IOINIT 
ERRORs: None 
STACK REQUIREMENT: 5 
REGISTER: A,X,Y 



Description: 



This routine will scan the Commodore 16* s keyboard and check for 
pressed key. If yes, which keys were pressed. This is the same 
routine which is called at each Interrupt. After pressing a key, the 
relevant ASCII-value is stored in the keyboard memory. 

This routine is only called if the normal IRQ-interrupt is ignored. 



Procedure: 



1) Call this routine, 
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EXAMPLE: 



$1010 20 9F FF JSR SCNKEY 



; Keyboard scan 



$1013 20 E4 FF JSR GET IN 



;Fetch character 



$1016 C9 00 



CMP #0 



;Key pressed? 



$1018 FO F6 



BEQ GET 



;Yes, scan again 



$101A 20 D2 FF JSR CHROUT 



; Print character 
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NAME: SCREEN 



PURPOSE: Identify Screen Format 
ADDRESS: $FFED 
TRANSFER: X,Y 
PREPARATION: None 
STACK REQUIREMENT: 2 
REGISTER: X,Y 



Description: 



This routine shows the screen format, e.g. 40 columns and 25 lines in 
Y. It can be used to determine on which machine a program is running. 
This function was introduced for the Commodore 64 to make your 
programs more easily compatible with other computers. 



Procedure : 



1) Call this routine, 
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EXAMPLE: 

$1010 20 ED FF JSR SCREEN 

$1013 86 DO STX MAXCOL 

$1015 84 Dl STY MAXROW 
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NAME: SECOND 



PURPOSE: Transfer of secondary address for LISTEN 

ADDRESS: $FF93 

TRANSFER: A 

PREPARATION: LISTEN 

ERRORS: see READST 

STACK REQUIREMENT: 8 

REGISTER: A 



Description: 



This routine sends a secondary address to an I/O device after calling 
the LISTEN routine and device commanded to LISTEN. This routine 
cannot be used for transferring a secondary address after calling the 
TALK routine. 



Preparation : 



1) Load secondary address to be sent in the accumulator, OR it with 
$60 

2) Call this routine. 
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EXAMPLE: 



$1010 




$1010 




$1010 




$1010 


A9 08 


$1012 


49 60 



; Address unit no. 8 

,' (Floppy) with secondary 

jaddress 15 



LDA #8 
EOR #96 

$1014 20 Bl FF JSR LISTEN 
$1017 A9 OF LDA #15 
$1019 20 93 FF JSR SECOND 
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NAME: SETLFS 



PURPOSE: Opening A Logical Data File 

ADDRESS: $FFBA 

TRANSFER: A,X,Y 

PREPARATION: None 

ERRORS: None 

STACK REQUIREMENT: 2 

REGISTER: None 



Description: 



This routine will set the logical file no., device address and a 
secondary address (command number) for other KERNAL routines. 
The logical file no. is used by the system as a kind of key for the 
file table, created by the OPEN routine. Device addresses can range 
from 0-31. The following codes are used . 

ADDRESS: ITEM: 



Keyboard 

1 Cass. Recorder 

2 RS-232C 

3 Screen 

4 Printer on Serial Bus 
8 Disc Drive 
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A device number of 4 or above refers automatically to devices on the 
serial bus. 

A command to the device is sent as secondary address via the serial 
bus after the device number has been sent during the serial 
handshake. If no secondary address is being sent, the Y register must 
be set to 255. 



Procedure : 



1) Load logical file number in accumulator. 

2) Load device number into X register. 

3) Load command into Y register. 



4) Call this routine. 



EXAMPLE: 



$1010 



; Logical file 32, device no 4 



$1010 



;and no command no. 



$1010 A9 20 



LDA #32 



$1012 A2 04 



LDX #4 



$1014 



AO FF 



LDY #255 



$1016 



20 BA FF JSR SETLFS 
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NAME: SETMSG 



PURPOSE: Print Out Of System Messages 

ADDRESS: $FF90 

TRANSFER: A 

PREPARATION: None 

ERRORS: None 

STACK REQUIREMENT: 2 

REGISTER: A 



Description: 



This routine controls the printing of error and control messages by 
the KERNAL. When called, the errors message or control message can be 
selectedd according to the contents of the accumulator. 
Error message example -FILE NOT FOUND. 
Control message example - PRESS PLAY ON TAPE 



Bit 7 = 1 — Error Message 
Bit 6 = 1 — Control Message 
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Procedure : 



1) Set accumulator to required value. 



2) Call this routine. 



EXAMPLE: 



$1010 A9 40 



LDA #$40 



; Control messages 



$1012 20 90 FF JSR SETMSG 



$1015 A9 80 



LDA #$80 



; Error messages 



$1017 20 90 FF JSR SETMSG 



$101A A9 00 



LDA #0 



;A11 KERNAL messages off 



$101C 20 90 FF JSR SETMSG 
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NAME: SETNAM 



PURPOSE: Set Up File Name 
ADDRESS: $FFBD 
TRANSFER: A,X,Y 
PREPARATION: None 
ERRORS: None 
REGISTER: None 



Description: 



This routine sets up the file names for the routines OPEN, SAVE or 
LOAD. The no. of characters in the file name is loaded into the 
accumulator. The address of the file name is loaded into registers X 
and Y. The standard lower byte/higher byte format applies. The 
address can be any valid system memory address from which the file 
name is stored as a string. If no file name is required, the 
accumulator is loaded with 0. In this case registers X and Y can be 
set to any memory address. 



Procedure: 

1) Load length of file name into accumulator. 

2) Load lower value address byte of file name into X register. 

3) Load higher value address byte of file name into Y register. 
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A) Call this routine. 

T 

EXAMPLE: 

$1010 A9 04 LDA #NAME1-NAME ;Load length of file name 

$1012 A2 1A LDX #<NAME ;Load address of file name 

$1014 A0 10 LDY #>NAME 

$1016 20 BD FF JSR SETNAM 
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NAME: SETTIM 



PURPOSE: Set System Clock 
ADDRESS: $FFDB 
TRANSFER: A,X,Y 
PREPARATION: None 
ERRORS: None 
STACK REQUIREMENT: 2 
REGISTER: None 



Description: 



A system clock maintained by the interrupt routine is updated every 
1/60 s ("Jiffy"). The clock is 3 Bytes "long", so that it can show up 
to 5,184,000 "Jiffies" (24 hrs.). Then the clock resets to 0. Before 
calling this routine, the accumulator has to be loaded with the most 
significant (highest) byte, the X Register with the next significant 
byte and the Y Register with the least significant byte of the start 
up time (in Jiffies). 



Procedure: 



1) Load the most significant Byte of the 3 Byte number in the 
accumulator. 
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2) Load next Byte in the X Register. 

3) Load the least significant Byte in the Y Register, 
A) Call this routine. 



EXAMPLE: 



$1010 



$1010 



$1010 A9 00 



$1012 A2 OE 



$1014 AO 10 



;Set clock to 10 minutes 
;(=3600 Jiffies) 



LDA #0 



LDX #>3600 



LDY #<3600 



;Most significant Byte 
;Next Byte 
; Lowest Byte 



$1016 20 DB FF JSR SETTIM 
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NAME: SETTMO 



PURPOSE: Set Timeout Flag for Serial bus 

ADDRESS: $FFA2 

TRANSFER: A 

PREPARATION: None 

ERRORS: None 

STACK REQUIREMENT: 2 

REGISTER: None 



Description: 



This routine is exclusively used with an additional Bus-Card and is 
practically of no importance for the Commodore 16. 

With this routine the Timeout-Flag for the IEC-Bus is set. When this 
is done the Commodore C-16 waits 64 ms for the message from a device 
on IEC-Bus. If the device does not answer to the DAV-Signal (valid 
data address) of the Commodore 16 within this period of time then the 
computer recognizes an error and leaves the Handshake sequence. If on 
call up of this routine Bit 7 in the accumulator is set to 0, then 
Timeouts are effective. Accordingly Timeouts are ineffective if Bit 7 
is set to 1. 
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Procedure (Set Timeout-Flag): 

1) Set Bit 7 of accumulator to 0. 

2) Call this routine. 

Procedure (Clearing Timeout Flag): 

1) Set Bit 7 of accumulator to 1. 

2) Call this routine. 

EXAMPLE: 

$1010 ;Put Timeout-Flag 

$1010 A9 00 LDA "0 
$1012 20 A2 FF JSR SETTMO 
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NAME: STOP 



PURPOSE: STOP Key Scan 
ADDRESS: $FFE1 
TRANSFER: A 
PREPARATION: NONE 
ERRORS: None 
STACK REQUIREMENT: None 
REGISTER: A,X 



Description : 



If during an UDTIM call up the STOP key was pressed, then after 
call-up of this routine the Zero Flag is set. Furthermore the 
channels are reset to the default values. All other Flags remain 
unchanged. If the STOP key was not pressed, the accumulator contains 
1 byte of the last keyboard scan, so the operator can also check if 
certain other keys were pressed. 



Procedure: 

1) Before this routine, UDTIM has to be called. 

2) Call this routine. 

3) Check for Zero Flag. 
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EXAMPLE: 

$1010 20 EA FF JSR UDTIM ; Check for STOP 

$1013 20 El FF JSR STOP 

$1016 FO FB BNE LOOP jWait for STOP key 
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NAME: TALK 



PURPOSE: Command A Device On Serial Bus To Talk 

ADDRESS: $FFB4 

TRANSFER: A 

PREPARATION: None 

ERRORS: see READST 

STACK REQUIREMENT: 8 

REGISTER: A 



Description: 



In order to use this routine, a device no. between and 31 has to be 
loaded into the accumulator. When called, this routine does a logical 
OR bit by bit to convert the device no. to talk address. This data is 
then sent as command via the serial bus. 



Procedure: 

1) Load accumulator with device no 

2) Call this routine. 
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EXAMPLE: 

$1010 ;TALK command for device 4 

$1010 A9 04 LDA #4 
$1012 20 B4 FP JSR TALK 



Page 145 



NAME: TKSA 



PURPOSE: Send a secondary address to a device commanded to talk 

ADDRESS: $FF96 

TRANSFER: A 

PREPARATION: TALK 

ERRORS: see READST 

STACK REQUIREMENT: 8 

REGISTER: A 



Description: 



This routine sends a secondary address via the serial bus to a TALK 
device. This routine must be called with a number between 4 and 31 in 
the accumulator. This no. is then sent as secondary address command 
via the serial bus. It is vital to call the TALK routine before hand. 
TKSA is not effective after LISTEN. 



Procedure: 

1) Use TALK- routine. 

2) Load secondary address into accumulator, OR with 96. 
3)Call this routine. 
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EXAMPLE : 

$1010 ;Tell device no # 4 to talk with command 7 

$1010 A9 04 LDA #4 

$1012 20 B4 FF JSR TALK 

$1015 A9 07 LDA #7 

$1017 4? 60 EOR #96 

$1019 20 96 FF JSR TKSA 
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NAME: UNTLK 



PURPOSE: Send an UNTALK command 

ADDRESS: $FFAB 

TRANSFER: None 

PREPARATION: None 

ERRORS: see READST 

STACK REQUIREMENT: 8 

REGISTER: A 



Description: 



With this routine an UNTALK command is sent via serial bus. All 
commands which received a TALK command before stop data transfer. 



Procedure: 



1) Call this routine, 



EXAMPLE: 



$1010 20 AB FF JSR UNTLK 
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NAME: VECTOR 



PURPOSE: Manage RAM Vectors 
ADDRESS: $FF8D 
TRANSFER: X,Y 
PREPARATION: None 
ERROR MESSAGE: None 
STACK REQUIREMENT: 2 
REGISTER: A,X,Y 



Description: 



This routine manages all jump vectors stored in RAM. If on call up of 
this routine, the accumulator carry bit is set, then the current 
contents of the RAM Vectors are stored in a table whose address is 
given by the contents of registers X and Y. 

When working with this routine you have to be extremely careful. 
First of all the entire vector contents should be read in the user 
area, the required vectors changed and then copy the content back to 
the system vectors. 
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Procedure (Reading the System RAM Vectors): 



1) Set Carry 

2) Load registers X and Y with the required Vector Address. 



3) Call this routine. 



Procedure (Load System RAM Vectors): 



1) Clear Carry 

2) Set registers X and Y to the RAM Address Vector table to be 
loaded. 

3) Call this routine. 



EXAMPLE: 



$1010 



; Change input routine 



$1010 A2 30 



LDX #<USER 



$1012 AO 10 



LDY #>USER 



$1014 38 



SEC 



$1015 20 8D FF JSR VECTOR ;Read old vectors 



$1018 A9 00 



LDA #<MYINP ;0wn input routine 



$101A 8D 3A 10 STA USER+10 



$1010 AS> 20 



LDA #>MYINP 
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$101F 8D 3B 10 STA USER+11 

$1022 A2 30 LDX #<USER 

$1024 A0 10 LDY #>USER 

$1026 18 CLC 

$1027 20 8D FF JSR VECTOR ; Change vectors 
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KERNAL ERROR MESSAGES 



Listed below, you will find a list of error messages which can appear 

when working with the KERNAL routines. If one of these errors occur, 

the carry bit of the accumulator is set and the no. of the error 
message transferred to the accumulator. 

Some KERNAL I/O routines do not work with these codes of error 
messages. Instead the errors are identified by the KERNAL routine 
READST. 



NUMBER: MEANING: 



Routine finished by STOP key 

1 Too many open files 

2 File already open 

3 File not open 

4 File not found 

5 Device not present 

6 File is not an input file 

7 File is not an output file 

8 File name is missing 

9 Illegal device no 
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4.5 MEMORY MAP 



ADDRESS ADDRESS 
(hex) (dec) 



LABEL 



DESCRIPTION 



$0000 



$0001 



$0002 



$0003-0004 3-4 



$0005-0006 5-6 



$0007 



$0008 



$0009 



$000A 



$000B 



$000C 



$000D 



$000E 



8 



10 



11 



12 



13 



14 



PDIR 7501 Data Direction Register 

PORT 7501 8 Bit I/O-Port 

SRCHTK Flag for loops 

ZPVEC1 New Start Address (RENUMBER) 

ZPVEC2 Step Width (RENUMBER) 

CHARAC Search Character 

ENDCHR Flag: Searching for inverted 
comma at end of a String 

TRMPOS Screen column from last TAB 

VERCK Flag: 0=L0AD, 1=VERIFY 

COUNT Input buffer counter, No. 
of elements 

DIMFLG Flag:Standard-Field Dimensioning 

VALTYP Variable Flag: $FF=String 
$00=Numerical 

INTFLG Numeric Flag: $80=Integer 
$00=Floating Point 
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$000F 



$0010 



$0011 



15 



16 



17 



DORES Flag: Data Scan 

SUBFLG Flag: User Function Call-Up 

INPFLG Flag: $00=INPUT, $40=GET 
$98= READ 



$0012 



18 



TANSGN Flag: ATN Sign/Comparison 



$0013 



19 



$0014-0015 20-21 



$0016 



$0026 
$0027 
$0028 
$0029 
$002A 



22 



$0017-0018 23-24 



$0019-0021 25-33 



$0022-0023 34-35 



$0024-0025 36-37 



38 
39 
40 
41 
42 



CHANNL 

LINNUM 

TEMPPT 

LASTPT 

TEMPST 

INDEX1 

INDEX2 

RESHO 

RESMOH 

RESMO 

RESLO 



Flag: Current I/O Prompt 
Store For BASIC Integers 
Pointer: Temporary String Stack 
Last Temporary String Vector 
Stack For Temp. String Vector 
Store For Auxiliary Pointer 1 
Store For Auxiliary pointer 2 



Product Area For Multiplication 



i» n 



»» n 



it tt 



$002B-002C 43-44 



TXTTAB 



Pointer: Start BASIC 



$002D-002E 45-46 



VARTAB 



Pointer: Start BASIC Variables 



$002F-0030 47-48 



ARYTAB' Pointer: Start of BASIC Arrays 



$0031-0032 49-50 



STREND pointer: End of Arrays 
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$0033-0034 51-52 



$0035-0036 53-54 



$0037-0038 55-56 



$0039-003A 57-58 



$003B-003C 59-60 



$003D-003E 61-62 



$003F-0040 63-64 



$0041-0042 65-66 



$0043-0044 67-68 



$0045-0046 69-70 



$0047-0048 71-72 



$0049-004A 73-74 



$004B-004C 75-76 



$004D 



77 



$004E-004F 78-79 



$0050-0051 80-81 



FRETOP Pointer: Start Strings 
( Moving Down ) 

FRESPC Auxiliary Pointer for Strings 

MEMSIZ Pointer: Top Of RAM 
Available For Basic 

CURLIN Current BASIC Line No. 

TXTPTR Previous BASIC Line No. 

FNDPNT Pointer: BASIC Statement For CONT 

DATLIN Current DATA Line No. 

DATPTR Pointer: Current DATA Address 

INPPTR Vector: INPUT Routine 

VARNAM Current BASIC Variable Name 

VARPNT Current Variable Address 

FORPNT Variable Pointer For FOR/NEXT 

OPPIR Y Save; Operator Save 
Basic Pointer Save 

OPMASK Comparison Mask: 1= Larger, 
2= Equal, 4= Smaller 

DEFPNT Pointer: Variable Of DEF FN 

DSCPNT Pointer :String Descriptor 



$0052 



82 



$0053 



83 



HELPER Flag: HELP or LIST 



$0054-0056 84-86 



JMPER 



Jump Vector For Functions 
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$0057-0060 87-96 



TEMPF1 



Numeric Work Area 



$0061 



97 



FACEXP Accumulator 1-Exponent 



$0062-0065 98-101 



. $0066 



$0067 



$0068 



$0069 



$006E 



$006F 



$0070 



$0075 



$0080 



$0081 



$0082 



102 



103 



104 



105 



$006A-006D 106-109 



110 



111 



112 



$0071-0072 113-114 



$0073-0074 115-116 



117 



$0076-0078 118-120 



$0079-007B 121-123 



$007C-007D 124-125 



$007E-007F 126-127 



128 



129 



130 



FACHO 



FACSGN 



BITS 

ARGEXP 

ARGHO 

ARGSGN 

ARISGN 

FACOV 

FBUFPT 

AUTINC 

MVDFLG 

KEYNUM 

DSDESC 

TOS 

TMPTON 

VOICNO 

RUNMOD 

POINT 



1-Mantissa 



1-Sign 



SGNFLG Pointer iSeries Evaluation Const. 



Accumulator 1 Hi-Order (Overflow) 



Exponent 



Mantissa 



Sign 



Sign Comp. Ace 1 Vs Ace 2 



Accumulator 1: Lo Order Rounding 



Pointer: Cassette Buffer 



Increment On AUTO-Command, 0=0ff 
Flag:l=10K Reserved For Graphics 
Temporary store for MID$-Command 
Descriptor for DS$ 
Top Of Run-Time Stacks 
Working Area (Sound) 



Flag For RUN ($00=No, $80= Yes) 
Flag for OOS-Command 
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$0083 



131 



GRAPHM Current Graphics Mode ($00=Text, 
$20=Hires, $60=Split Hires, $A0- 
Multicolour, $E0=Split Multi Col. 



$0084 


132 


COLSEL 


$0085 


133 


MCI 


$0086 


134 


FG 


$0087 


135 


SCXMAX 


$0088 


136 


SCYMAX 


$0089 


137 


LTFLAG 


$008A 


138 


RTFLAG 


$008B 


139 


STOPNB 


$008C-008D 


140-141 


GRAPNT 


$008E 


142 


VTEMP1 


$008F 


143 


VTEMP2 


$0090 


144 


STATUS 


$0091 


145 


STKEY 


$0092 


146 


SPVERR 


$0093 


147 


VERFCK 


$0094 


148 


C3P0 


$0095 


149 


BSOUR 


$0096 


150 


RSAV 



Current Chosen Colour 



Multicolour-Colour 1 



Foreground-Colour 



Max. No. Of Columns 



Max. No. Of Rows 



Flag: PAINT Left 

Flag: Paint Right 

Flag: Paint Stop ($00-same,$80= 
Different) As Background Colour 

Pointer: Bit Map Colour 

Temporary Intermediate Memory 



KERNAL I/O Status Word:ST 

Flag: STOP/RVS Key 

Temporary Memory 

Flag: 0=L0AD, 1=VERIFY 

Flag: Serial Bus Character In 
Buffer ($00=No, $80=Yes) 

Ch. In Buffer For serial Bus 

Temporary memory for BASIC 
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$0097 



$0098 



$0099 



$009A 



$00A6 
$00A7 
$00A8 
$00A9 
$00AA 
$00AB 
$00AC 
$00AD 
$00AE 



151 



152 



153 



154 



$009B-009C 155-156 



$009D-009E 157-158 



$009F-00A0 159-160 



$00A1-00A2 161-162 



$00A3-00A5 163-165 



166 
167 
168 
169 
170 
171 
172 
173 
174 



$00AF-00B0 175-176 



$00B1 



177 



LDTND 

OFLTN 
DFLTO 
MSGFLG 

SAL 

EAL 

Tl 

T2 

TIME 

R2D2 

TPBYTE 

BS0UR1 

FPVERR 

DCOUNT 

FNLEN 

LA 

SA 

FA 

FNADR 

ERRSUM 



No. Of Open Files / Index 
For File Tables 

Default Input Device (Norm. 0) 

Default 0/P Device (Norm. 3) 

Flag: $80=BASIC-Direct Mode, 
$CO=M/C Monitor, $00=Program 

Pointer: Tape Buff. /Scroll Screen 

Pointer: Tape End/Program End 

Temporary Memory 



Clock (approx. 1/60 s) 
Register for serial bus 
Register for cassette routine 
Register for serial bus 
Temporary Colour-Vector 
Register for cassette routine 
Length of file name 
Logical file number 
Current secondary address 



Current device no. 



Current file name 



Cass, error counter 
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$00B2-00B3 178-179 



$00B4-00B5 180-181 



$00B6-00B7 182-183 



$00B8-00B9 184-185 



$00BA-00BB 186-187 



$00BC-00BD 188-189 



$00BE-00BF 190-191 



$00C0-00C1 192-193 



$00C2 



$00C3 



$00C6 



$00C7 



$00CA 
$00CB 

$00CC 
$00CD 
$00CE 
$00CF 



194 



195 



$00C4-00C 196-197 



198 



199 



$00C8-00C9 200-201 



202 
203 

204 
205 
206 
207 



STAL 


I/O Start Address 


MEMUSS 


Basic loading address 


TAPEBS 


Pointer: Load end addr. (tape) 


TMP2 


Address for VECTOR 


WRBASE 


Pointer: Cassette buffer data. 


IMP ARM 


Pointer : String for Primms 


FETPTR 


Pointer: Long Fetch Routine 


SEDSAL 


Temp. Mem. '.Scroll Register 


RVS 


Flag: RVS-Ch.($12=Yes,$00=No) 


INDX 


Pointer: End of line for input 


LSXP 


Cursor X/Y-Position for input 


SFDX 


Flag: Pressed key ($40=none) 


CRSW 


Flag: INPUT or GET from K/B 


PNT 


Pointer: Current scr. line add. 


PNTR 


Cursor position current line 


QTSW 


Flag: Editor in inverted comma 




mode (0=No) 


SEDT1 


Length of current screen line 


TBLX 


Current pos.of cursor line no 


DATAX 


Last character (I/O) 


INSRT 


Flag:INST-Mode.>0=No of ins. 
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$0000-0007 208-215 



Res. for speech synthesizer 



$00D8-00E8 218-232 



$00E9 



$00EF 



$00F0 



$00F3 
$00F4 
$00F5 
$00F6 
$00F7 
$00F8 
$00F9 
$00FA 
$00FB 
$00FC 
$00FD 
$00FE 
$00FF 



233 



$00EA-00EB 234-235 



$00EC-00EE 236-238 



239 



240 



$00F1-00F2 241-242 



243 
244 
245 
246 
247 
248 
249 
250 
251 
252 
253 
254 
255 



CIRSEG 

USER 

KEYTAB 

NDX 

STPFLG 

TO 

CHRPTR 

BUFEND 

CHKSUM 

LENGTH 

PASS 

TYPE 

USEKDY 

XSTOP 

CURBNK 

XON 

XOFF 

SEDT2 

LOFBUF 



Res. for application software 
Working area 



Pointer : Current screen colour 



Vector: K.B. Decoding Tab.$E026 
No of char. in key board buffer 
Flag:Pause (CTRL-S/T) 
Register for M/C. Monitor 



Zero-Page-Address for M/C.Mon. 



n ii 



it ti 



Register for check sum 



Block-Type 

bit7=l: Write, bit6=l: read 
Register for X on STOP Key Test 
Present Bank-Configuration 



Character to be sent for X-On 



it ti H H x-Off 



Work area for Editor 
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$0100-010F 256-271 



FBUFFER 



$0110 



272 



SAVEA 



Intermed.mem.for SAVE & RESTORE 



$0111 



273 



SAVEY " 
n 



it it it 



$0112 



274 



it ii it ii 



$0113-0122 275-289 



COLKEY Col./Luminiscence Table in RAM 



$0123 



290 



$0124-01FF 291-511 



SYSSTK Processor Stack 



$0200-0258 512-600 



BUF 



Basic I/P or Monitor Buffer 



$O259-025A 601-602 



OLDLIN 



Previous BASIC Line No. 



$025B-025C 603-604 



OLDTXT Pointer: BASIC Command for CONT 



$025D-02AC 605-684 



BASIC/DOS Work Area 



$025D 



605 



XCNT 



DOS Loop Counter 



$025E-026D 606-621 



FNBUFR 



Area for file names 



$026E 



622 



D0SF1L Length of first file name 



$026F 



623 



D0SDS1 DOS (DEVICE 1) 



$0270-0271 624-625 



D0SF1A Address of first file name 



$0272 



626 



D0SF2L Length of second file name 
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$0273 



627 



$0274-0275 628-629 



$0276 



$0277 



$0278 



$027B 



$027C 



630 



631 



632 



$0279-027A 633-634 



635 



636 



$027D-02AC 637-684 



$02AD-02AE 685-686 



$02AF-02B0 687-688 



$02B1-02B2 689-690 



$02B3-02B4 691-692 



$02B5-02B6 693-694 



$02B7-02B8 695-696 



$02B9-02BA 697-698 



$02BB-02BC 699-700 



$02BD-02BE 701-702 



$02BF-02C0 703-704 



$02C1-02C2 705-706 



$02C3 



707 



DOSFA 

D0SF2A 

DOSLA 

DOSFA 

DOSSA 

DODDID 

DIDCHK 

DOSSTR 

DOSSPC 

XPOS 

YPO 

XDEST 

YDEST 

XABS 

YABS 

XSGN 

YSGN 

FCT1 

FCT2 

ERRVAL 

LE55ER 



DOS (Device 2) 



Address of second file name 



DOS logical address 



" device address 



" secondary address 



" Disk-ID 



ID-Flag 

DOS Output Buffer 



" Work Area 



Current X Pos: Graphic Cursor 



Current Y Pos .'Graphics Cursor 
X Target-Co-ordinate 



Absolute value of X 



ii n 



Sign of X 
Sign of Y 
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-"iA 


GREW 




$02C5 


709 


ANGSGN 


Stat Value of angle 


$02C6-02C7 


710-711 


SINVAL 


Sines of angle 


$02C8-02C9 


712-713 


COSVAL 


Cosines of angle 


$02CA-02CB 


714-715 


ANGCNT 


Temp, Reg. for angle 


$02CD 


717 


BNR 


Pointer : Start (PRINT USING) 


$02CE 


718 


ENR 


Pointer : End 


$02CF 


719 


DOLR 


Flag: Dollar 


$02D0 


720 


FLAG 


Flag: Comma 


$02D1 


721 


SWE 


Counter 


$02D2 


722 


USGN 


Value of exponent 


$02D3 


723 


UEXP 


Pointer : exponent 


$02D4 


724 


VN 


No of of ch. before dec. point 


$02D5 


725 


CHSN 


Flag: Adjustment 


$02D6 


726 


VF 


No of ch. before dec. point 


$02D7 


727 


NF 


No of ch. after dec. point 


$02D8 


728 


POSP 


Flag: +/- (Field) 


$02D9 


729 


FESP 


Flag: Exponent (Field) 


$02DA 


730 


ETOF 


Switch 


$02DB 


731 


CFORM 


Character Counter (Field) 


$02DC 


732 


SNO 


Preliminary Character nc-. 
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$02DD 


733 


BLFD 


$02DE 


734 


BEGFD 


$02DF 


735 


LFOR 


$02E0 


736 


ENDFD 



Flag: Space Bar/* 

Pointer to beginning of field 

Length of Format String 



Pointer to end of field 



$02CC-02CD 716-717 



S02CE-02CF 718-719 



$02D0-02D1 720-721 



$02D2-02D3 722-723 



$02D4-02D5 724-725 



$02D6-02D7 726-727 



$02D8-02D9 728-729 



$02DA 



$02DB 



$02DC 



730 



731 



732 



XCENTR 

YCENTR 

XDIST1 

YDIST1 

XDIST2 

YDIST2 

DISEND 

COLCNT Column Counter: CHAR Command 

ROWCNT Row " " " 

STRCNT For CHAR Command 



$02CC-02CD 716-717 XC0RD1 Pixel 1, X Co-ordinate 
$02CE-02CF 718-719 YC0RD1 Pixel 1, Y Co-ordinate 
$02D0-02D1 720-721 BOXANG Rotating Angle-Box 



$02D2-02D3 722-723 XCOUNT 



$0204-0205 724-725 YCOUNT 



$02D6-02D7 726-727 BXLENG Length of one side 
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$02D8-02D9 728-729 



$02DA-02DB 730-731 



XC0RD2 Pixel 2, x Co-ordinate 
YC0RD2 Pixel 2, Y Co-Ordinate 



$02CC-02CD 716-717 



XCIRCL Centre of circle-X co-ordinate 



$02CE-02Cf 718-719 



YCIRCL Centre of circle-Y co-ordinate 



$02D0-02D1 720-721 



XRADUS X-Radius 



$02D2-02D3 722-723 



YRADUS Y-Radius 



$Q2D4-02D5 724-725 



ROTANG Rotating Angle 



$02D6-02D7 726-727 



$02D8-02D9 728-729 



ANGBEG 



Circle-Segment-Angle Start 



$02DA-02DB 730-731 



ANGEND 



•i ii 



it tt 



End 



$02DC-02DD 732-733 XRCOS 



$02DE-02DF 734-735 YRSIN 



$02E0-02E1 736-737 XRSIN 



$02E2-02E3 738-739 YRCOS 



X Radius * Cosine of 
rotating angle 

Y Radius * Sine of 
rotating angle 

X Radius * Sine of 
rotating angle 

Y Radius * Cosine of 
rotating angle 



$02CD 



717 



KEYLEN 



$02CE 



718 



KEYNXT 



Page 167 



$02CF 



719 



$02D4 



$02DD 



$02E4 

$02E5 
$02E6 
$02E7 
$02E8 

$02E9 



724 



$02D5-02D6 725-726 



$02D7-02D8 727-728 



$02D9-02DA 729-730 



$02DB-02DC 731-732 



733 



$02DE-02E1 734-737 



740 

741 
742 
743 
744 

745 



STRSZ Length of String Variables 
(SHAPE) 



$02D0 


720 


GETTYP 


Set Shape-Mode 


$02D1 


721 


STRPTR 


Counter for String Positioi 


$02D2 


722 


OLDBYT 


Old Bitmap byte 


$02D3 


723 


NEWBYT 


Variable for new string or 
Bitmap-Byte 



XSIZE 
YSIZE 
XSAVE 
STRADR 

BITIDX 
SAVSIZ 
CHRPAG 

BITCNT 
SCALEM 
WIDTH 
FILFLG 



Length of Shapes in X-Direction 



it it 



" Y-Direction 



Temporary memory for X size 

Memory for Shape or 
string descriptor 

Pointer to a Bit in a Byte 

Temporary Memory 

High byte of a Character ROM 
address for CHAR-Command 

Register for GSHAPE 

Flag: SCALE Mode ($00=0ff) 

Flag: Double Pixel Size 

Flag: Colour a rectangle 
(BOX Command) 



BITMSK Temporary Memory for Bit Mask 
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$02EA 



746 



NUMCNT Length of String 



$02EB 



$02EC 



$02EF 



$02F0 



$02F1 



747 



748 



$02ED-02EE 749-750 



751 



752 



753 



TRCFLG Flag: TRACE Mode ($00=0ff ) 



T3 

T4 

VTEMP3 

VTEMP4 

VTEMP5 



Intermediate Mem. for DIRECTORY 



it it 



Temporary Memory for Graphics 

No. of Graphic Parameters 

Parameter: $01=relative 
$00 = absolute 



S02F2-02F3 754-755 



$02F4-02F5 756-757 



$02FE-02FF 766-767 



$0300-0301 768-769 



$0302-0303 770-771 



$0304-0305 772-773 



$0306-0307 774-775 



$0308-0309 776-777 



$030A-030B 778-779 



$030C-030D 780-781 



$030E-030F 782-783 



$0310-0311 784-785 



ADRAY1 Pointer to conversion routine 
Comma after Integer 

ADRAY2 Pointer to conversion routine 
Integer after Comma 

BNKVEC Vector: Function Module (cart.) 

IERROR Vector :BASIC Error Mess. ($8686) 

IMAIN Vector :BASIC Warm Start ($8712) 

ICRNCH Vector.-BASIC Token gener. $8956 



IQPLOP 
IGONE 
IEVAL 
IESCLK 

IESCPR 
IESCEX 



Vector: BASIC Text list ($8B6E) 

Vector BASIC Command exec.$8BD6 

Vector :BASIC Token Eval. ($9417) 

Vector :BASIC User Token 
generation $896A 



Vector: Create keyword 



$8B88 



Vector: Prepare User Token $8C8B 
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$0312-0313 786-787 ITIME 



$0314-0315 788-789 CINV 



Vector: Interrupt (Clock) $CE42 
Vector: Hardware Interrupt $CE0E 



$0316-0317 790-791 CBINV 



Vector: BRK-Interrupt 



$0318-0319 792-793 IOPEN 



Vector :Kernal OPEN Routine $EF53 



$031A-031B 794-795 



$031C-031D 796-797 



$0324-0325 804-805 



$032A-032B 810-811 



I CLOSE Vector :Kernal CLOSE 



ICHKIN Vector :Kernal CHKIN 



$031E-031F 798-799 ICKOUT 



$0320-0321 800-801 ICLRCH 



$0322-0323 802-803 IBASIN 



$0326-0327 806-807 ISTOP 



$0328-0329 808-809 IGETIN 



Vector :Kernal CHKOUT 



Vector :Kernal CLRCHN 



Vector :Kernal CHRIN 



IBSOUT Vector :Kernal CHROUT 



Vector :Kernal STOP 



Vector :Kernal GETIN 



ICLALL Vector rKernal CLALL 



$032C-032D 812-813 USRCMD 



Vector: Monitor Break 



$EE5D 
$ED18 
$ED60 
$EF0C 
$EBE8 
$EC4B 
$F265 
$EBD9 
$EF08 
$F44C 



$032E-032F 814-815 ILOAD 



Vector :Kernal LOAD Routine $F04A 



$0330-0331 816-817 ISAVE 



Vector :Kernal SAVE Routine $F1A4 



$0332-03F2 818-1010 TAPBUF Tape Buffer 



$0332 



818 



$0333-0334 819-820 



$0335-0336 821-822 



$0337-0346 823-838 



File type(0=BASIC,l=M/C) 
Start Address (low/high) 
End Address (low/high) 
Program-Name (16 characters) 
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$03F3-03F4 1011-1012 



$03F5-03F6 1013-1014 



$03F7-0436 1015-1078 



$0437-0454 1079-1108 



$0455-0472 1109-1138 



$0473-0478 1139-1144 



$0479-0484 1145-1156 



$0485-0493 1157-1171 



$0494-04Al 1172-1185 



$04A2-04A4 1186-1188 



$04A5-04AF 1189-1199 



$04B0-04BA 1200-1210 



$04BB-04C5 1211-1221 



$04C6-04D0 1222-1232 



$04D1-04DB 1233-1243 



$04DC-04E6 1244-1254 



$04E7 



$04E8 



$04E9 



$04EA 



1255 



1256 



1257 



1258 



WRLEN 


Data Counter (Write) 


RDCNT 


Data Counter (Read) 


INPQUE 


RS-232 Input Buffer (64 Bytes) 


ESTAKL 


Tape Error Stack (Low Bytes) 


ESTAKH 


M " " (High Bytes) 


CHRGET 


Subroutine: Read next Byte from 




BASIC-Text 


CHRGOT 


Read again same Text-Byte 


QNUM 




INDSUB 


Subroutine for loading from 




optional bank 


ZERO 


Numerical constant for BASIC 


INDTXT 


Text pointer 


INDIN1 


Index 1 


INDIN2 


Index 2 


INDST1 


String 1 


INDLOW 


Lowtr 


INDFMO 


Facmo 


PUFILL 


Fill Character by PRINT USING 




(Standard: Space Bar) 


PUCOMA 


Comma symbol 


PUDOT 


Dot Symbol 


PUMONY 


Currency Character 
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$04EB-04EE 1259-1262 TMPDES Temporary memory for INSTR 



$04EF 



1263 



$04F0-04F1 1264-1265 



$04F2-04F3 1266-1267 



ERRNUM Last Error Number 

ERRLIN Row no. in which last 

error occurred ($FFFF=N0 error) 

TRAPNO Reference to row no. for 
ON ERROR GO TO 



$04F4 



1268 



TMPTRP Temporary register for TRAP 



$04F5-04F6 1269-1270 ERRTXT Intermediate Memory for TRAP 



$04F7 



1271 



OLDSTK BASIC Text Pointer to last error 



$04F8-04F9 1272-1273 



$04FA-04FB 1274-1275 



$04FC-04FD 1276-1277 



S04FE-04FF 1278-1279 



TMPTXT DO-Memory for BASIC Text Pointer 

TMPLIN DO-Memory for row no. 

MTIMLO Low byte of sound 1/2 length 

MTIMHI High byte of sound 1/2 length 



$0500 



1280 



USRPOK USR Jump Command 



$0501-0502 1281-1282 



USRADD USR Address (low/high) 



$0503-0507 1283-1287 



RNDX Start Value for RND 



$0508 



1288 



$0509-0512 1289-1298 



DEJAVU Flag: Cold or warm start 
LAT Table of logical file numbers 



$0513-051C 1299-1308 



FAT Table of device numbers 



$051D-0526 1309-1318 



$0527-0530 1319-1328 



SAT Table of secondary addresses 
KEYD Keyboard Buffer (FIFO) 



$0531-0532 1329-1330 



MEMSTR Pointer: Start address of 
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RAM for operating system 



$0533-0534 1331-1332 



$0535 



$0536 



1333 



1334 



MSIZ Pointer: End of RAM Op. system 

TIMOUT Flag: Timeout (overrun) of 
(optional) IEC-Bus 

FILEND l=end of file reached 
othewise 



$0537 



1335 



CTALLY No. of characters in buffer 
(for Read and Write) 



$0538 



$0539 



1336 



1337 



CBUFVA No. of all valid characters 
in buffer (read only) 

TPTR Pointer: next ch. in buffer R/W 
or Read and Write) 



$053A 


1338 


FLTYPE 


$053B 


1339 


COLOR 


$053C 


1340 


FLASH 


$053D 


1341 




$053E 


1342 


HIBASE 


$053F 


1343 


XMAX 


$0540 


1344 


RPTFLG 


$0541 


1345 


KOUNT 


$0542 


1346 


DELAY 


$0543 


1347 


SHFLAG 


$0544 


1348 


LSTSHF 



Type of tape file 

Active Attribute Byte (colour, 
brightness, flashing) 

Flag: Character flashes ($00=No) 

Unused 

Video RAM start (Page) 

Size of keyboard buffer 

Flag: Key repeat ($80=all 
$40=none,$00=only DEL,CRSR,SPC) 

Counting speed for repeat 

Counter for repeat delay 

Flag: Keys SHIFT, CTRL, CBM key 

Last SHIFT Sample of keyboard 
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$0545-0546 1349-1350 



$0547 



$0548 



$0549 



$054A 



$054B 



1351 



1352 



1353 



1354 



1355 



$054C-054E 1356-1358 



$054F 
$0550 
$0551 
$0552 
$0553 
$0554 
$0555 
$0556 
$0557 
$0558 
$0559 
$055A 
$055B 
$055C 



1359 
1360 
1361 
1362 
1363 
1364 
1365 
1366 
1367 
1368 
1369 
1370 
1371 
1372 



KEYLOG 

MODE 

AUTODN 

LINTMP 

ROLFLG 

FORMAT 

MSAL 

WRAP 

TMPC 

DIFF 

PCH 

PCL 

FLGS 

ACC 

XR 

YR 

SP 

INVL 

INVH 

CMPFLG 

BAD 



Pointer: K.B Decoding Table 
Flag: SHIFT $80=No,$00=Yes 



Flag :Aut. Scroll. (down)0=0n( )=Off 



Intermediate mem. in scr.Pr-out 



Work Mem. of Machine Code Monitor 



For assembler 



Temporary Memory for assembler 



it it 



Program-Counter (high) 



(low) 



Processor-Flags 



Accumulata of Processor 



X-Register " 
Y-Register " 



Processor Stack Pointer 



Memory for Machine-Monitor 



it it 



M it 



Used by various Monitor Routines 
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$055D 



$055E 



$05E7 
$05E8 
$05E9 
$05EA 
$05EB 



1373 



1374 



$055F-0566 1375-1382 



$0567-05E6 1383-1510 



1511 
1512 
1513 
1514 
1515 



$05EC-06EB 1516-1771 



$05EC-05EF 1516-1519 



$05F0-05F1 1520-1521 



KYNDX Character counter: Function Key 

KEYIDX Pointer: Strings function key 

KEYBUF Length of function key strings 

PKYBUF Memory for Function key strings 

KDATA Temp. Mem. For data after DMA 

KDYCMD Selection, if DMA. Read or Write 



KDYNUM DMA device no. 



KDYPRS $FF=DMA present, otherwise $00 

KDYTYP Temporary Memory for DMA. 

SAVRAM Banking routines page 

PAT Physical Address (Table) 

LNGJMP Long- Jump (Address) 



$05F2 



1522 



FETARG " » (Accumulator) 



$05F3 



$05F4 



1523 



1524 



$05F5-065D 1525-1629 



S065E-06EB 1630-1771 



FETXRG " » (X-Register) 
FETSRG » " (Status-Register) 

AREA RAM-Field for Bank-Switching 
APECH " " for Speech Synthesizer 



$06EC-07AF 1772-1967 



STKTOP Pseudo Stack: BASIC Interpreter 



$07B0-07CC 1968-1996 



TAWKVA Tape working values 



$07B0 



1968 



WROUT Byte to be written on cassette 



$07B1 



1969 



PARITY Temporary Memory for parity 
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$07B2 



1970 



TT1 



Temporary Memory 



$07B3 



$07B5 



1971 



1973 



TT2 



Temporary Memory 



RDBITS Local Index for READBYTE-Routine 



$07B6 



1974 



ERRSP 



Pointer: Error-Stack 



$07B7 



1975 



FPERRS No of errors on pass 1 



$07B8-07B9 1976-1977 DSAMP1 



Time Constant 



$07BA-07BB 1978-1979 DSAMP2 



tt it 



$07BC-07BD 1980-1981 ZCELL 



ii ii 



$07BE 



1982 



SRECOV Stack Pointer for STOP-Key 



$07BF 



1983 



DRECOV 



" DROP-Key 



$07C0-07C3 1984-1987 TRSAVE Parameters sent after RDBLOK 



$07C4 



1988 



RDETMP Temporary Memory for RDBLOK 



$07C5 



1989 



LDRSCN 



$07C6 



1990 



CDERRM 



No of errors on RD Countdown 



$07C7 



1991 



VSAVE 



Temporary Memory for VERIFY 



$07C8-07CB 1992-1995 T1PIPE Temporary Memory for Tl 



$07CC 
$07CD 
$07CE 
$07CF 
$07D0 



1996 
1997 
1998 
1999 
2000 



ENEXT Read Error 



UOUTQ User Char, to be sent (RS-232) 



UOUTFG (0=empty, l=full) 

SOUTQ System Character to be sent 

SOUNFG (0=empty, l=full) 
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$07D1 
$07D2 
$07D3 
$07D4 
$07D5 
$07D6 
$07D7 
$07D8 



2001 
2002 
2003 
2004 
2005 
2006 
2007 
2008 



INQFPT Pointer to start of input buffer 



INQRPT " " end of " 



INQCNT No of Char, in Input Buffer 
ASTAT Temporary status of ACIA 



AINTMP Temporary memory for INPUT 



ALSTOP Flag: Local Pause 

ARSTOP Flag: Remote Control Pause 



APRES 



Flag: Marks presence of ACIA 



$07D9-07E4 2009-2020 KLUDES Indirect Routine (downloaded) 



$07E5 



$07E6 



$07E7 



$07E8 



$07E9 



2021 



2022 



2023 



2024 



2025 



SCBOT 



SCTOP 



SCLF 



SCRT 



SCRDIS 



Screen window: bottom edge 

" " top edge 

" " left edge 

" " right edge 



Flag: automatic inserting 
Last printed character 
Memory for Screen Administration 
Temp. reg. for color on INST & DEL 



I07EE-07F1 2030-2033 BITABL Row Link Table for Screen 



$07EA 


2026 


INSFL 


$07EB 


2027 


LSTCH 


$07EC 


2028 


LOGSCR 


$07ED 


2029 


TCOLOR 



$07F2 



$07F3 



2034 



2035 



SAREG Save Accumulator on SYS-Command 



SXREG Save X-Register " 



Page 177 



$07F4 


2036 


SYREG 


$07F5 


2037 


SPREG 


$07F6 


2038 


LSTX 


$07F7 


2039 


STPDSB 


$07F8 


2040 


RAMROM 



Save Y-Register " " " 

Save SP-Register " " " 

Currently pressed key: CHR$(n), 

Flag: CTRL-S (O=open, 6=closed) 

RAM/ROM-Switch over to machine 
code monitor ($00=R0M, $80=RAM) 



$07F9 



2041 



COLSW RAM/ROM-Switch over for colour 
Brightness-Table :$00=R0M,$80=RAM 



$07FA 



2042 



FFRMSK 



ROM-Mask for divided screen 



$07FB 



2043 



VMBMSK 



Video RAM Mask for " " 



$07FC 



2044 



LSEM 



Motor control tape recorder 



$07FD 



2045 



PALCNT Auxiliary counter for clock on 
PAL-System 



$07FE-07FF 2046-2047 



Unused 



BEFORE CALLING HI-RES. GRAPHICS 



$0800-0BE7 2048-3047 TEDATR Colour-RAM (Text Mode) 
$0C00-0FE7 3072-4071 TEDSCN Video-RAM (Text Mode) 



$1000-3FFF 4096-16383 BASBGN Basic RAM- 



-C16 



$1000-7FFF 4096-32767 BASBGN 



BASIC RAM- 



-C16+16K 



$1000-FCFF 4096-64767 BASBGN BASIC RAM C16+64K or PLUS4 
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AFTER CALLING HI-RES GRAPHICS 

$1800-1BE7 6144-7143 TEDATR Lumlnscence Table (Graphics 
Mode) 

$1C00-1FE7 7168-8167 TEDSCN Colour Table (Graphics Mode) 

$2000-3F3F 8192-16191 GRBASE Bitmap Graphics Screen 

$1000-1 7FF 4096-6143 BASBGN BASIC RAM 

C16 

$4000-7FFF 16384-32767 BASBGN BASIC RAM 

C16+16K 

$4000-FCFF 16384-64767 BASBGN BASIC RAM 

PLUS4:C16+64K 

PLUS 4 ONLY 

$8000-CFFF 32768-53247 BASIC Interpreter 

$D000-D3FF 53248-54271 Character ROM (Capitals/Graphics Ch. set 

$D400-D7FF 54272-55295 Character ROM (Small /Capital Character 

$D800-FBFF 55296-64511 Operating System 

$FC00-FCFF 64512-64767 ROM Banking Routines 

$FDOO-FDOF 64768-64783 ACIA (Only PLUS/4) 

SFD10-FD1F 64784-64799 6529 Parallel Port (Only PLUS/4) 

$FDDO-FDDF 64976-64991 Module Bank Port 

$FEOO-FEFF 65024-65279 DMA Disk System 
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4.6 TED CHIP ADDRESSES ($FF00-$FF3F) 



REG. ADDRESS ADDRESS BITS 
HEX. DEC. 



DESCRIPTION 






$FFOO 


65280 


Timer 1, Reload Low 


1 


$FF01 


65281 


Timer 1, Reload High 


2 


$FF02 


65282 


Timer 2, Low 


3 


$FF03 


65283 


Timer 2, High 


4 


$FF04 


65284 


Timer 3, Low 


5 


$FF05 


65285 


Timer 3, High 



$FF06 



65286 0-2 
3 
4 
5 
6 



Vertical Scroll Position (Y) 
Selection of 24/25 rows (1=25) 
Switch screen off 
Switch Bitmap Mode (1=0N) 
Switch Ext. Colour Mode(l=0N) 



Testbit (always 0) 



$FF07 



65287 0-2 
3 

4 
5 
6 
7 



Horizontal Scroll Position (X) 
Choice of 38/40 columns (1=40) 
Switch Multicolour Mode on (lson) 
Switch Freeze Mode on (l=on) 
PAL/NTSC-Mode (0=PAL, 1=NTSC) 
RVS-Video (0=Hardware, l=Software) 



8 



$FF08 65288 



Keyboard Matrix 
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9 $FF09 65289 



10 FFOA 65290 





Interrupt-Sources 





Not used 


1 


Raster Interrupt 


2 


(Light Pen, not possible with C-16) 


3 


Timer 1 Interrupt 


4 


Timer 2 Interrupt 


5 


Not used 


6 


Timer 3 Interrupt 


7 


Interrupt Bit 




Interrupt Masking 





Bit 8 of Raster Comparison 




(Reg. 11) 


1 


Raster- Interrupt 


2 


(Light Pen, not possible with 




C-16 


3 


Timer 1 Interrupt 


4 


Timer 2 Interrupt 


5 


Not used 


6 


Timer 3 Interrupt 


7 


Not used 



11 


FFOB 


65291 




Raster Comparison (Bit 0-7) 


12 


FFOC 


65292 


0-1 
2-7 


Bit 8-9 of Cursor Position 
(Reg. 13) 
Not Used 


13 


FFOD 


65293 




Hardware Cursor Position (Bit 0-7) 


14 


FFOE 


65294 




Frequency Voice 1 (Bit 0-7) 


15 


FFOF 


65295 




" 2 (Bit 0-7) 



16 FF10 65296 0-1 Frequency Voice 2 (Bit 8-9) 

2-7 Not used 
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17 FF11 65297 0-3 Volume (O=off, 15=loud) 

4 Switch voice 1 on (l=on) 

5 Switch voice 2 rectangular on 
(l=on) 

6 Switch voice 2 noise on (l=on) 

7 Sound Reload Bit 



18 


FF12 


65298 


0-1 

2 

3-5 

6- 


Bit 8-9 Frequency Voice 1 
(Reg. 14) 

RAM/ROM Bank (0=RAM, 1=R0M) 
Address of Bitmap RAM (Bit 13-15) 
Not used 



19 FF13 6529 ROM-Bank Status Bit (Read only) 

1 Force Single Clock Bit (^pro- 
hibits double time frequency) 
2-7 Address of character set (Bit 
10-15) 



20 


FF14 


65300 


0-2 
3-7 


Not used 

Address of Video-RAM (Bit 11-15) 


21 


FF15 


6530 


0-3 
4-6 
7 


Background Colour 
Background Luminiscence 
Not used 


22 


FF16 


65302 


0-3 
4-6 

7 


Background 1 Colour 

" " Luminiscence 
Not used 


23 


FF17 


65303 


0-3 
4-6 

7 


Background 1 colour 

" ' " Luminiscence 
Not used 


24 


FF18 


6530 


0-3 
4-6 

7 


Background 3 Colour 

" " Luminiscence 
Not used 


25 


FF19 


65305 


0-3 

7 


Frame Colour 
Not used 
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26 



FF1A 6530 



0-1 
2-7 



Bit 8-9 of Bit Map Reload (Reg. 27) 
Not used 



27 


FF1B 


65307 




Bit Map Reload of Character 
Position (Bit 0-7) 


28 


FF1C 


65308 



1-7 


Bit 8 of Raster-Row (Reg. 29) 
Not used 


29 


FF1D 


65309 




Current Raster Row (Bit 0-7) 


30 


FF1E 


65310 




Current raster Column (Bit 1-8) 



31 FF1F 65311 0-2 

3-6 
7 



Vertical Sub Address 
Flash Rate 
Not used 



62 FF3E 65342 



ROM-Select (Write only) 



63 FF3F 65343 



RAM-Select (Write only) 
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4.7 KERNAL JUMP TABLE ($FF49-$FFFF) 



ADDRESS ADDRESS 
(HEX) (DEC) 



CODE 



NAME 



DESCRIPTION 



$FF49 



65353 JMP $B7C2 



$FF4C 

$FF4F 

$FF52 

$FF55- 

$FF7E 

$FF7F 

$FF80 

$FF81 

$FF84 

$FF87 

$FF8A 
$FF8D 
$FF90 
$FF93 



65356 JMP $DC49 



65359 JMP $FBD8 



65362 JMP $F445 



65365 



65406 



65407 



65408 



$2A 



$84 



Define FUNCTION key no. 
after $76,addr. after $22-23, 
length in accumulator) 

Print 

Print message 

Call M/C Monitor 



Not used 



Not used 



Not used 



it it 



65409 JMP $D84E CINT Initialise Editor 



65412 JMP $F30B IOINIT Initialise I/O 



65415 JMP $F352 



RAMTAS Initialise RAM, open cassette 
buffer, screen to $0C00 



65418 JMP $F2CE RESTOR Restore vectors 



65421 JMP $F2D3 VECTOR Vector RAM 



65424 JMP $F41A SETMSG Control KERNAL Messages 



65427 JMP $EE4D SECOND Send sec. addr. to LISTEN 
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$FF96 
$FF99 
$FF9C 
$FF9F 
$FFA2 

$FFA5 

$FFA8 

$FFAB 

$FFAE 
$FFB1 

$FFB4 

$FFB7 

$FFBA 

$FFBD 
$FFCO 
$FFC3 
$FFC6 
$FFC9 
$FFCC 
$FFCF 
$FFD2 



65430 JMP $EE1A TKSA Send sec. addr. to TALK 

65433 JMP $F427 MEMTOP Set/read top RAM Pointer 

65436 JMP $F436 MEMBOT Set/read bottom RAM Pointer 

65439 JMP $DB11 SCNKEY Scan keyboard 

65442 JMP $F423 SETTMO Set Timeout for (optional) 

IEC-Bus 

65445 JMP $EC8B ACPTR Input byte from serial port 

65448 JMP $ECDF CIOUT Output byte via serial port 

65451 JMP $EF3B UNTLK Command serial bus to UNTALK 

65454 JMP $EF23 UNLSN Com. serial bus to UNLISTEN 

65457 JMP $EE2C LISTEN Com. all dev. on bus to LISTEN 



65460 JMP $EDFA 



TALK Com. dev. on serial bus to TALK 



65463 JMP $F41C READST Read I/O Status Word 



65466 JMP $F413 



SETLFS Set Logical, Primary and 
Secondary Address 



65469 JMP $F40C SETNAM Determine file names 



65472 JMP ($0318) OPEN Open a logical file $EF53 

65475 JMP ($031 A) CLOSE Close a logical file $EE5D 

65478 JMP ($031C) CHKIN Open channel for input $ED18 

65481 JMP ($031E) CHKOUT Open channel for output $ED60 

65484 JMP ($0320) CLRCHN Close I/O channels $EF0C 

65487 JMP ($0322) CHRIN Input Character $EBE8 

65490 JMP ($0324) CHROUT Output Character $EC4B 
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$FFD5 
$FFD8 
$FFDB 
$FFDE 
$FFE1 
$FFE4 
$FFE7 

$FFEA 
$FFED 
$FFFO 
$FFF3 

$FFF6 
$FFF9 
$FFFC 
$FFFE 



65493 JMP $F043 LOAD Load from peripheral device 
65496 JMP $F194 SAVE Store on peripheral device 



65499 JMP $CF2D SETTIM Set time 



65502 JMP $CF26 RDTIM Read time 



65505 JMP ($0326) STOP Scan STOP Key 



65532 



65534 



$F265 



65508 JMP ($0328) GETIN Read ch. from K.B. buffer $EBD9 



65511 JMP ($032A) CLALL Close all channels 

& logical files 

65514 JMP $CEF0 UDTIM Increment Time 



$EF08 



65517 JMP $0834 SCREEN Identify X, Y Screen Set-Up 

65520 JMP $D839 PLOT Read/set X, Y Cursor Posit iong 

65523 JMP $FC19 IOBASE Base address-Reports back 

on I/O devices. 



65526 STA $FF3E 



65529 JMP $F2A4 



$FFF6 



$FCB3 



Switch-on ROM 



Jump to Reset Routine 



Processor Reset 



Processor Interrupt 
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4.8 COMPARISON TABLE C-64 AND C-16 



In many newspapers, programs for the CBM 64 are published which could 
also be of interest to the C-16 owner. While the programs to some 
extent try to teach the C-64 BASIC Commands, which the C-16 has 
built-in anyway (e.g. Graphics-Commands) and are therefore 
uninteresting for you, there are surely some programs which you would 
also like to have on your C-16. To facilitate the re-writing, we have 
compiled a comparison chart of all identical addresses. Since many 
C-64 programs have numerous PEEK and POKE commands, you can look for 
the corresponding C-16 Address in this table. You cannot, of course, 
re-write everything (e.g. programs with Sprites) but what is 
comparable is listed in the following table. The explanation of the 
meaning of the address is very short; a more detailed description can 
be found in the previous chapter. 



ADDRESS ADDRESS ADDRESS ADDRESS LABEL 



MEANING 



C64 hex C64 dec C16 hex C16 dec 



$0000 





$0001 


1 


$0003 


3 


$0005 


5 


$0007 


7 


$0008 


8 


$0009 


9 


$000A 


10 



$0000 



$0001 



$02F2 754 



$02F4 756 



$0007 



$0008 8 



$0009 



D6510 Data Direction Register 



R6510 I/O-Port 



ADRAY1 Pointer to Conv. GK>IN 



ADRAY2 



" IN>GK 



CHARAC Search Character 



ENDCHR FL:Search for inv. COMMA 



TRMPOS Screen col. from 1. TAB 



$000A 10 VERCK FL:0=L0AD, 1=VERIFY 
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$000B 


11 


$000B 


$000C 


12 


$000C 


$000D 


13 


$000D 


$000E 


14 


$000E 


$0010 


16 


$0010 


$0011 


17 


$0011 


$0012 


18 


$0012 


$0013 


19 


$0013 


$0014- 


20- 


$0014- 


$0016 


22 


$0016 


$0017- 


23 


$0017- 


$0019- 


25- 


$0019- 


$0022- 


34- 


$0022- 


$0026- 


38- 


$0026- 


$002B- 


43- 


$002B- 


$0020- 


45- 


$0020- 


$002F- 


47- 


$002F- 


$0031- 


49- 


$0031- 


$0033- 


51- 


$0033- 


$0035- 


53- 


$0035- 


$0037- 


55- 


$0037- 



11 COUNT Input buffer pointer 

12 DIMFLG FL:Standard field dimen. 

13 VALTYP Data type: $FF=String 

14 INTFLG Data type: $80=Integer 

16 SUBFLG FL:User Function 

17 INPFLG FL:$00=INPUT, $40=GET 

18 TANSGN FL:TAN sign 

19 CHANNL FL: INPUT Comment 
20- LINNUM Total num. value 

22 TEMPPT PTR:Temp. string stack. 

23- LASTPT Last String Address 

25- TEMPST Stack for temp. String 

34- INDEX Field for aux. pointer 

38- RESHO Field for multiplier. 

43- TXTTAB PTR:Start BASIC text 

45- VARTAB PTR:Start BASIC Variable. 

47- ARYTAB PTR:Start BASIC Arrays. 

49- STREND PTR:End BASIC Strings (+1) 

51- FRETOP PTR:Start of Strings 

53- FRESPC PTR:Aux. Strings 

55- MEMSIZ PTR:Top BASIC Address 
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$0039- 


57- 


$003B- 


59- 


$003D- 


61- 


$003F- 


63- 


$0041- 


65- 


$0043 


67- 


$0045 


69- 


$0047- 


71- 


$0049- 


73- 


$004B- 


75- 


$0061 


97 


$0062- 


98- 


$0066 


102 


$0067 


103 


$0068 


104 


$0069 


105 


$006A- 


106 


$006E 


110 


$006F 


111 


$0070 


112 


$0071- 


113 



$0039- 57- CURLIN 



$0259- 601- OLDLIN 



$025B- 602- OLDTXT 



$003F- 


63- 


DATLIN 


$0041- 


65- 


DATPTR 


$0043 


67- 


INPPTR 


$0045- 


69- 


VARNAM 


$0047- 


71- 


VARPNT 


$0049- 


73- 


FORPNT 


$004B- 


75- 


OPPTR 


$0061 


97 


FACEXP 


$0062- 


98- 


FACHO 


$0066 


102 


FACSGN 


$0067 


103 


SGNFLG 


$0068 


104 


BITS 


$0069 


105 


ARGEXP 


$006A- 


106- 


ARGHO 


$006E 


110 


ARGSGN 


$006F 


111 


ARISGN 


$0070 


112 


FACOV 


$0071- 


113- 


FBUFPT 



Current BASIC Line 



Previous BASIC Line 



PTR:BASIC for CONT 



Current DATA Line 



PTR: Current DATA Address 



V: INPUT Routine 



Curr. BASIC Var. Name 



Address of curr. vari, 



Var. ch.for FOR/NEXT 



Int. ch.for BASIC 



Floating Point 1 Expo. 



1 Mant, 



ii H 



1 sign 



PTR:Polynom. Evaluation 
Floating Point 1 overfl. 



2 Expo, 



" 2 Mant. 



Page 189 



" 2 sign 



Sign Comp. Ace 1 & 2 
Floating pt. 1 rounding 



PTR: Cassette Buffer 



$0073- 


115- 


$0079 


121 


$007A- 


122- 


$008B- 


139- 


$0090 


144 


$0091 


145 


$0093 


147 


$0094 


148 


$0095 


149 


$0098 


152 


$0099 


153 


$009A 


154 


$009D 


157 


$00A0- 


160- 


$00AC- 


172- 


$00AE- 


174- 


$00B7 


183 


$00B8 


184 


$00B9 


185 


$00BA 


186 


$00BB- 


187 



$0473- 

$0479 

$003B- 

$0503- 

$0090 

$0091 

$0093 

$0094 

$0095 

$0097 

$0098 

$0099 

$009A 

$00A3- 

$009B- 

$009D- 

$00AB 
$00AC 
$00AD 
$00AE 
$00AF- 



1139- CHRGET 



1145 CHRGOT 



59- TXTPTR 



1283- RNDX 



144 STATUS 



145 STKEY 



147 VERFCK 



148 C3P0 



149 BSOUR 



151 LDTND 



152 DFLTN 



153 DFLTO 



154 MSGFLG 



163- TIME 



155- SAL 



157- EAL 



end 



171 FNLEN 



172 LA 



173 SA 



174 FA 



175- FNADR 
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Read sub routine 



Repeat read 



PTR:Current Byte of Text 



Start value for RND 



Kernal I/O Status Word 



PTR:STOP/RVS-Key 



FL:0=L0AD, 1=VERIFY 



FL:Ser. Bus, Character 



Character in buffer 



No. of open files 
Input device (Defaul=3) 
Output dev. (Default=0) 
FL:$80=Direct, $00=Pr. 
Clock (approx. 1/60) 



PTR:Cass.buf/Scn. scroll 



PTRrCassette end/Program 



Lnth. of curr. file name 



Logical Data file No. 



Current Second. Address 



Current device no. 



PTR: Current file Name 



$00C1- 


193- 


SO0C3- 


195- 


$00C5 


197 


$00C6 


198 


$00C7 


199 


$00C8 


200 


$00C9- 


201 


$OOCB 


203 


$00D 


208 


$00D1- 


209- 


$00D3 


211 


$00D4 


212 


$00D6 


214 


$00D8 


216 


$00F3- 


243- 


$00F5- 


243 


$0100 


256 


$0200 


512 


$0259- 


601 


$0263- 


611 



$00B2- 

$00B4- 

$07F6 

$00EF 

$00C2 

$00C3 

$00C4- 

$00C6 

$00C7 

$00C8- 

$00CA 

$00CB 

$00CD 

$00CF 

$00EA- 

$00EC- 

$0100- 

$0200- 

$0509- 

$0513- 



178- STAL 



180- MEMUSS Basic Loading Address 



2038 LSTX 



239 NDX 



194 RVS 



I/O Start Address 



Currently pressed key 



No of ch. in K.B. buffer 



FL:RVS Character (l=Yes) 



195 INDX PTR:End of logical line 



196- LSXP 



198 SFDX 



199 CRSW 



200- PNT 



202 PNTR 



lire 



203 QTSW 



205 TBLX 



207 INSRT 



234- USER 



236- KEYTAB 



256- 



512- BUF 



1289- LAT 



1299- FAT 
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Cursor X/Y for Input 
FL: Pressed key 



FL: Input INPUT or GET 



PNT: Current Screen Char. 



Cursor column in current 



FL: Inverted comma mode 



Cursor line 



FL:INST Mode 



PTR: Current Colour RAM 



V: Keyboard Decod. 



Processor Stack 



System Input Buffer 
Table of log. file no. 



Table of device nos. 



$026D- 

$0277- 

$0281- 

$0283- 

$0285 

$0286 

$0288 

$0289 

$028A 

$028B 

$028C 

$028D 

$028E 

$028F- 

$0291 

$0292 

$0300- 

$0302- 

$0304- 

$0306- 

$0308 



621- 
631- 
641- 
643- 
645 

648 

649 

650 

651 

652 

653 

654 

655 

657 

658 

768- 

770- 

772- 

774- 

776- 



$051D- 

$0527- 

$0531- 

$0533- 

$0535 

$053B 

$053E 

$053F 

$0540 

$0541 

$0542 

$0543 

$0544 

$0545- 

$0547 

$0548 

$0300 

$0302- 

$0304- 

$0306- 

$0308- 



1309- SAT 



1319- KEYD 



1329- MEMSTR 



1331- MSIZ 



1333 TIMOUT 



1339 COLOR 



1342 HIBASE 



1343 XMAX 



1344 RPTFLG 



1345 KOUNT 



1346 DELAY 



1347 SHFLAG 



1348 LSTSHF 



1349- KEYLOG 



Table of sec. addr. 



Keyboard Buffer (FIFO) 



PTR: Start Address RAM 



PTRrEnd Address RAM 



Fl:Time overrun IEC 



Character colour 



Video RAM Start, Page 
Size of Keyboard Buffer 



FL:Key repeat 



Counting speed for repeat 
Counter for repeat delay 



FL:Keys SHIFT, CTRL 



Last SHIFT Sample 



Pointer to key decod. 



1351 MODE F1:$80=SHIFT ineffective 



1352 AUTODN 



768- IERROR 



770- IMAIN 



772- ICRNCH 



774- IQPLOP 



FL: Automatic Scrolling 



V: BASIC-Error Message 



V: BASIC Warm start 



V: BASIC Token gener. 



V: BASIC Text listen 



776- IGONE V: Execute BASIC-Command 
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$030A- 

$030C 

$030D 

$030E 

$030F 

$0310 

$0311- 

$0314- 

$0316- 

$031A- 

$031C- 

$031E- 

$0320- 

$0322- 

$0324- 

$0326- 

$0328- 

$032A- 

$032C 

$032E- 

$0330- 



778- 

780 

781 

782 

783 

784 

785- 

788- 

790- 

794- 

796- 

798- 

800- 

802- 

804- 

806- 

808- 

810- 

812- 

814- 

816- 



$030A- 

$07F2 

$07F3 

$07F4 

$07F5 

$0500 

$0501- 

$0314- 

$0316- 

$0318- 

$031A- 

$031C- 

$031E- 

$0320- 

$0322- 

$0324- 

$0326- 

$0328- 

$032A- 

$032C- 

$032E- 



778- IEVAL 



2034 SAREG 



2035 SXREG 



2036 SYREG 



2037 SPREG 



1280 USRPOK 



1281- USRADD 



788- CINV 



V: BASIC Token Evaluation 



Ace. for SYS-Command 



X-Reg. for SYS-Command 
Y-Reg. for SYS Command 



SP-Reg. for SYS command 



USR Jump 



USR-Address (low/high) 
V: Hardware-Interrupt 



790- CBINV V: BRK-Interupt 



792- I OPEN 



794- ICLOSE 



796- ICHKIN 



798- ICKOUT 



800- ICLRCH 



802- IBASIN 



804- IBASOUT 



806- ISTOP 



808- IGETIN 



810- ICLALL 



812- USRCMD 



V: Kernal OPEN 



V: KERNAL CLOSE 



V: KERNAL CHKIN 



V: 



V: 



V: 



V: 



V: 



V: 



V: 



CHKOUT 

CLRCHN 

CHRIN 

CHROUT 

STOP 

GETIN 

CLALL 



User IRQ (Monitor) 



814- ILOAD V: Kernal-LOAD 



Page 193 



$03332- 

$033C- 

$0400- 

$0800- 

$D011 

$D012 

$D016 

$0020 

$0021 

$D022 

$D023 

$0024 

$0800 



818- 

828- 

1024- 

2048- 

53265 

53266 

53270 

53280 

53281 

53282 

53283 

53284 

55296 



$0330- 816- ISAVE 



$0332- 818- TAPBUF 



$0C00- 3076 VICSCN 



$1000- 4096- BASBGN 



$FF06 
$FF0B 
$FF07 
$FF19 



$0800 



65286 
65291 
65287 
65305 



$FF15 65301 

$FF16 65302 

$FF17 65303 

$FF18 65304 



V: Kernal-SAVE 



Cassette-Buffer 



Video-RAM 



BASIC-RAM 



Bit 7 is different! 



Raster Interrupt 



Bits 5-7 different! 



Frame Colour 



Background colour 



1 " 



2048 COLSCN 



Colour-RAM 
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MEMORY MAP OF THE CBM 64 



ADDRESS 



(hex) 



$0000-OOFF 
$0100-01FF 
$0200-03FF 
$0400-07E7 
$0800-9FFF 
$AOOO-BFFF 
$COOO-CFFF 
$D000-D3FF 
$D400-D7FF 
$D800-DBE7 
$DCOO-DCFF 
$DDOO-DDFF 
$DEOO-DFFF 
$EOOO-FFFF 



ADDRESS 



(dec) 



0- 255 
256- 511 
512- 1023 
1024- 2023 
2048-40959 
40960-49151 
49152-53247 
53248-54271 
54272-55295 
55296-56295 
56320-56575 
56576-56831 
56832-57343 
57344-65535 



DESCRIP 



ION 



Zero-Page; 

Processor-Stack 

Different; Variables, Cassette Buffer 

Video-RAM 

BASIC-RAM 

BASIC- Interpreter 



Free RAM 



Colour-RAM 



(for sub-routines etc.) 



Video-Controller (Reg. up to $D02E) 
Sound-Controller (Reg. up to $D41C) 



CIA #1 : Keyboard, Joystick, Timer 
CIA #2 : Serial Bus, RS-232, Timer 



Not used; free for I/O-Extensions 



Kernal-ROM 
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5. UTILITIES 



5.1 RANDOM VALUE GENERATOR IN MACHINE CODE 



The following example demonstrates how to create random values in 
machine code. This is of special interest to games programmers, who 
frequently needs random values. In our exanjiple, a throw with two dice 
is simulated. When you press the space bar the dice are played and 
the result of our throw will be shown on ttje top of the screen. As 
random start value, the raster beam is usec(. 



>1000 00 


OB 


10 


00 00 9E 34 


31 : 


r 4 


>1008 31 


32 


00 


00 00 00 00 


00 : 


rl2 


>1010 A9 


93 


20 


D2 FF 20 46 


10 : 


r). r? f 


>1018 A9 


OF 


8D 


11 08 8D 13 


08 : 


r) 


>1020 20 


E4 


FF 


C9 20 DO F9 


20 : 


r $?i p9 


>1028 35 


10 


8D 


11 OC 20 35 


10 : 


r5.... 5 


>1030 8D 


13 


OC 


DO EB 20 50 


10 : 


r...p+ p 


>1038 FO 


FB 


C9 


07 BO F7 C9 


07 : 


r0;i.07i 


>1040 BO 


F3 


18 


69 30 60 AD 


OB : 


:r03.)0 - 


>1048 FF 


A2 


04 


95 DO CA 10 


FB ; 


:r?»..pj. 


>1050 A9 


EO 


25 


D4 09 20 85 


D4 : 


:r) %t. . 


>1058 18 


A2 


04 


B5 DO 75 DO 


95 : 


:r.".5p5p 


>1060 D5 


CA 


10 


F7 18 A2 04 


B5 : 


:ruj.7.». 


>1068 DO 


75 


D5 


95 DO CA 10 


F7 : 


:rp5u.pj. 


>1070 18 


A2 


02 B5 DO 75 D7 


95 : 


:r.".5p5w 


>1078 DO 


CA 


10 


F7 A5 DO 60 


AA 


:rpj.7%p 


. 1010 


A9 ! 


93 


LDA #$93 






. 1012 


20 D2 FF JSR $FFD2 






. 1015 


20 46 10 JSR $1046 






. 1018 


A9 


OF 


LDA #$0F 






. 101A 


8D 11 08 STA $0811 






. 101D 


8D 13 08 STA $0813 






. 1020 


20 E4 FF JSR $FFE4 






. 1023 


C9 


20 


CMP #$20 






. 1025 


DO 


F9 


BNE $1020 






. 1027 


20 


35 


10 GSR $1035 
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. 102A 


8D 11 0C STA $0C11 


. 102D 


20 35 10 3SR $1035 


. 1030 


8D 


13 OC STA $0C13 


. 1033 


DO EB 


BNE $1020 


. 1035 


20 50 10 JSR $1050 


. 1038 


FO FB 


BEQ $1035 


. 103A 


C9 


07 


CMP #$07 


. 103C 


BO 


F7 


BCS $1035 


. 103E 


C9 


07 


CMP #$07 


. 1040 


BO F3 


BCS $1035 


. 1042 


18 




CLC 


. 1043 


69 


30 


ADC #$30 


. 1045 


60 




RTS 


. 1046 


AD OB FF LDA $FFOB 


. 1049 


A2 


04 


LDX #$04 


. 104B 


95 


DO 


STA $D0,X 


. 104D 


CA 




DEX 


. 104E 


10 


FB 


BPL $104B 


. 1050 


A9 


EO 


LDA #$E0 


. 1052 


25 


D4 


AND $D4 


. 1054 


09 


20 


ORA #$20 


. 1056 


85 


D4 


STA $D4 


. 1058 


18 




CLC 


. 1059 


A2 


04 


LDX #$04 


. 105B 


B5 


DO 


LDA $DO,X 


. 105D 


75 


DO 


ADC $DO,X 


. 105F 


95 


D5 


STA $D5,X 


. 1061 


CA 




DEX 


. 1062 


10 


F7 


BPL $105B 


. 1064 


18 




CLC 


. 1065 


A2 


04 


LDX #$04 


. 1067 


B5 


DO 


LDA $DO,X 


. 1069 


75 


D5 


ADC $D5,X 


. 106B 


95 


DO 


STA $DO,X 


. 106D 


CA 




DEX 


. 106E 


10 F7 


BPL $1067 


. 1070 


18 




CLC 


. 1071 


A2 


02 


LDX #$02 


. 1073 


B5 


DO 


LDA $D0,X 


. 1075 


75 


D7 


ADC $D7,X 


. 1077 


95 


DO 


STA $D0,X 


. 1079 


CA 




DEX 
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107A 


10 F7 


BPL $1073 


107C 


A5 DO 


LDA $D0 


107E 


60 


RTS 
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5.2 JOYSTICK SCAN IN MACHINE CODE 

The following routine scans a joystick in machine code. We have 
already used this program several times in the Graphics Chapter as 
sub routine. It can, however, also be integrated in your own program. 



>1000 00 OC 10 00 00 9E 34 31 :r 41 

>1008 31 32 00 00 00 00 00 00 :rl2 

>1010 A9 FD 8D 08 FF AD 08 FF :r)=..?-.? 

XL018 AO 00 A2 00 4A BO 01 88 :r .".JO.. 

>1020 4A BO 01 C8 4A BO 01 CA :rj0.hj0.j 

XL028 4A BO 01 E8 86 DO 84 Dl :rjO.(.p.q 

>1030 29 08 60 AA AA AA AA AA :r). ***** 



1010 


a9 FD 


LDA #$FD 


1012 


8D 08 FF STA $FF08 


1015 


AD 08 FF LDA $FF08 


1018 


AO 00 


LDY BOO 


101A 


A2 00 


LDX #$00 


101C 


4A 


LSR 


101D 


BO 01 


BCS $1020 


101F 


88 


DEY 


1020 


4A 


LSR 


1021 


BO 01 


BCS $1024 


1023 


C8 


INY 


1024 


4A 


LSR 


1025 


BO 01 


BCS $1028 


1027 


CA 


DEX 


1028 


4A 


LSR 


1029 


BO 01 


BCS $102C 


102B 


E8 


INX 


102C 


86 DO 


STX $D0 


102E 


84 Dl 


STY $D1 


1030 


29 08 


AND #$08 


1032 


60 


RTS 
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5.3 TURBO MODE FOR THE C 16 



For all those, who think the C 16 Is too slow*, we can show you a 
trick with which it will become about 30% faster. Since we live in a 
Turbo age, we simply call it the Turbo Mode. The trick is to switch 
the screen off. Of course this is impractical if you want to create 
Graphics and see them at the same time, but not if you have 
mathematical problems to solve, where you don't always have to look 
at the screen. The speed advantage arises from the fact that the 
Video-Chip TED doesn't slow down the Micro Processor anymore once the 
screen is switched off. A small demo program, first in Turbo Mode and 
then in the normal mode, will show you how it works and how much time 
you can save. 



100 POKE 65286, PEEK (65286) AND 239 

110 GOSUB 150 

120 POKE 65286, PEEK (65286) OR 16 

130 GOSUB 150 

140 END 

150 T=TI 

160 FOR 1=1 TO 1000 

170 : B=B+1 

180 NEXT I 

190 PRINT USING »##.##" ;(TI-T)/60 

200 RETURN 



Page 200 



5.4 OLD (RESTORING A PROGRAM AFTER NEW) 



If you accidently type NEW or press the RESET button without having 
saved the program beforehand, all is not lost. We will show you how 
you can retreive the program using OLD Program. After NEW or a Reset, 
you only have to type SYS 1630 and your program is back again. The 
machine program is stored in an area which is not erased on Reset. If 
you load the OLD Program before you start programming, it will then 
be available any time you need it. 

PROCEDURE 

Type in the following BASIC Program and store it on a cassette or 
disc before you test it. Enter the monitor to save theprogram. 



S"0LD" , 01 , 065E , Q6C9 Cass . 

S"0LD M ,08,065E,06C9 Disc 



When you run it and there is no error then it is ready for use. You 
can try it on the Basic programme you just wrote. Type NEW and then: 
SYS 1630. It should now be back again (try LIST). The only thing 
which might not be correct is the first line number. 

To load the program, enter monitor and load the program with L 
command. 

The Basic program is no longer required as it has been saved as M/C 
program. 



100 FOR 1=1630 to 1630+106 

110 : READ A 

120 : POKE I, A 

130 : C=C+A 

140 NEXT I 

150 IF CO 10560 THEN PRINT "ERROR" : STOP 

160 DATA 165,43,133,3,165,44,133,4,160,4,177,3,240,3,200,208 

170 DATA 249,200,152,32,189,6,160,0,165,3,145,43,200,165,4,145 

180 DATA 43,200,169,0,145,43,200,145,43,165,43,133,3,165,44,133 

Page 201 



190 DATA 4,160,0,169,4, 32, 189, 6, 177, 3, 240,7,32,187,6, 169 
200 DATA 0,240,245,32,187,6,177,3,240,4,169,0,240,234,32,187 
210 DATA 6,32,187,6,165,3,133,45,165,4,133,46,96,169,1,24 
220 DATA 101,3,133,3,169,0,101,4,133,4,96 
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5.5 MERGE (LINKING OF PROGRAMS) 



Although the C-16*s BASIC is very comprehensive and leaves little to 
be desired, there is unfortunately one command missing which is very 
practical: MERGE. This allows linking of two BASIC programs. If you 
have a library of sub routines, you can always load these and link 
them to your current program using MERGE routine. 



PROCEDURE 



Type in the following program and save it on a cassette or disc by 
first entering the MONITOR. Use the following instructions. 

S"MERGE" , 01 , 06C9 , 06E8 Cass . 

S»MERGE » , 08 , 06C9, 06E8 Disc 

Type RUN. If there is an error message, check your listing. OLD is 
stored in the part of memory which is not effected by RESET. 



To link two programmes 

1. Load MERGE 

2. Load your first program from Cassette or Disk. 

3. Type: SYS 1737 

4. Load your second program. 

5. Type: SYS 1759 



Both your programs are now linked. You may have to re-number the new 
program. Avoid using low line numbers in your sub routines. It's best 
to give your sub-routines high line numbers (e.g. 62000, 63000). 
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100 FOR 1=1737 TO 1737+30 

110 : READ A 

120 : POKE I, A 

130 : C=C+A 

140 NEXT I 

150 IF C03786 THEN PRINT "ERROR" :STOP 

160 DATA 165,43,133,232,165,44,133,233,56,165,45,233,2,133,43,165 

170 DATA 46,233,0,133,44,96,165,232,133,43,165,233,133,44,96 
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5.6 VARLIST (LIST OF ALL USED VARIABLES) 



If you have created a program in BASIC and lost track of the 
variables you have already used, then this auxiliary program is 
useful. It gives a list of all variables so far used and states their 
type: FLOATINGPOINT (FLO), INTEGER (INT) or STRING (STR). 

PROCEDURE 

Type in the BASIC Program and store it. If there is no error, you can 
try it out. Type: SYS 16100 and the variables I, A and C used in the 
BASIC Loader will be printed. 



100 POKE 55,227 : POKE 56,62 : CLR 

110 FOR 1=16100 TO 16100+273 

120 : READ A 

130 : POKE I, A 

140 : C=C+A 

150 NEXT I 

160 IF CO30678 THEN PRINT "ERROR": STOP 

170 DATA 165, A5, 133, 2, 165,46, 133, 3, 165, 2, 197, 47, 208, 6, 165, 3 

180 DATA 197,48,240,40,160,0,177,2,141,227,63,201,128,176,30,200 

190 DATA 177,2,201,128,176,65,32,106,63,32,211,63,169,7,24,101 

200 DATA 2,133,2,169,0,101,3,133,3,76,236,62,96,56,233,128 

210 DATA 141,227,63,200,177,2,201,128,240,24,56,233,128,141,228,63 

220 DATA 32,134,63,32,147,63,174,238,63,32,164,63,32,205,63,76 

230 DATA 13,63,169,32,76,49,63,240,24,56,233,128,141,228,63,32 

240 DATA 134,63,32,147,63,174,240,63,32,164,63,32,205,63,76,13 

250 DATA 63,169,32,76,80,63,201,0,240,19,141,228,63,32,134,63 

260 DATA 32,147,63,174,239,63,32,164,63,32,205,63,96,169,32,76 

270 DATA 110,63,173,227,63,32,183,63,173,228,63,32,183,63,96,162 

280 DATA 15,142,241,63,169,32,32,183,63,174,241,63,202,208,242,96 

290 DATA 160,3,142,242,63,189,229,63,32,183,63,174,242,63,232,136 

300 DATA 208,240,96,141,243,63,140,245,63,142,244,63,32,210,255,174 

310 DATA 244,63,172,245,63,173,243,63,96,169,13,32,183,63,96,32 

320 DATA 228,255,201,32,240,1,96,32,228,255,201,32,208,249,96,0 

330 DATA 0,73,78,84,70,76,79,83,84,82,0,3,6,0,0,0,0,0 
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5.7 CROSS (PRODUCES CROSS REFERENCE FOR BASIC COMMANDS 



This auxiliary program produces a list of all BASIC Keywords and 
indicates in which lines they were used. In the lines from 63460 
onwards, you can indicate the keywords which interest you and their 
codes (the Codes or Tokens of the BASIC Keywords are listed in 
chapter 6.1). If you want to add one of your own, type it in from 
63480 together with the Token and increment the value in line 63450. 



PROCEDURE 



Type in the program and store it. Load the program which interests 
you and MERGE it with the CROSS Program (see 5.5 MERGE). Type: RUN 
63000 and answer the question if output is ,to be on screen or 
printer. Be a little patient because the program has to go through 
the whole BASIC Program for each keyword. 

63000 RESTORE 63450 : READ NU : DIM KW$(NU),K(NU) 

63010 FOR 1=1 TO NU : READ KW$(I),K(I) : NEXT I 

63020 SCNCLR : INPUT "SCREEN OR PRINTER (S/P)";Q$ 

63030 IF Q$="P" THEN OPEN 4,4 : CMD 4 : GOTO 63060 

63040 IF Q$<> M S" then 63020 

63050 : 

63060 FOR 1=1 to NU 



63070 
63080 
63090 
63100 
63110 
63120 
63130 
63140 
63150 
63160 
63170 
63180 
63190 
63200 



K=K(I) 

PRINT KW$(I) : CN=0 : C0=0 
PT=PEEK (43 ) +PEEK (44 )*256 
LN=0 

DO WHILE LNO63000 
NL=PEEK(PT)+PEEK(PT+1)*256 
LN=PEEK(PT+2)+PEEK(PT+3)*256 
IF LN=63000 THEN EXIT 
E=0 
J=PT+4 

DO WHILE JOPT+80 
CH=PEEK(J) 

IF CH=34 THEN GOSUB 63320 : IF E THEN EXIT 
IF CH=K THEN GOSUB 63390 
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63210 
63220 
63230 
63240 
63250 
63260 
63270 
63280 
63290 
63300 
63310 
63320 
63330 
63340 
63350 
63360 
63370 
63380 
63390 
63400 
63410 
63420 
63430 
63440 
63450 
63460 
63465 
63470 



IF CH=0 THEN EXIT 

LOOP 
PT=NL 
LOOP 

IF CNOO THEN PRINT 
PRINT "AMMOUNT=";CN : PRINT 
NEXT I 

IF Q$=»D" THEN PRINT#4 : CLOSE 4 
END 

• 

DO WHILE CHOO 

: J=J+1 : CH=PEEK(J) 

: F CH=34 THEN EXIT 

: IF CH=0 THEN E=l : EXIT 

LOOP 

RETURN 

• 
• 

IF C0=6 THEN C0=0 : PRINT 

C0=C0+1 : LN$=STR$(ln) : LN$=MID$(LN$,2,LEN(LN$)) 

IF LEN(LN$)<5 THEN LN$=MID$("00000",1,(5-LEN(LN$)))+LN$ 

PRINT LN$;" "; : CN=CN+1 

RETURN 

• 

DATA 10 

DATA DO, 235, EXIT, 237, FOR, 129 ,G0SUB, 141, GOTO, 137 

DATA IF, 139, LOOP, 236, NEXT, 130 

DATA RETURN, 142, WHILE, 253 
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APPEDIX 



6.1 THE TOKENS OF BASIC KEYWORDS 



As you perhaps know, each BASIC command is stored in the program as 
so called token i.e. it appears in the memory of the C 16 as a byte 
and not as a whole word, which saves a lot of memory. Listed below 
are all the keywords and their tokens. 



TOKEN 


TOKEN 


BASIC KEYWORD 


(DEC.) 


(HEX.) 




128 


$80 


END 


129 


$81 


FOR 


130 


$82 


NEXT 


131 


$83 


DATA 


132 


$84 


INPUT* 


133 


$85 


INPUT 


134 


$86 


DIM 


135 


$87 


READ 


136 


$88 


LET 


137 


$89 


GOTO 


138 


$8A 


RUN 


139 


$8B 


IF 


140 


$8C 


RESTORE 


141 


$8D 


GOSUB 


142 


$8E 


RETURN 


143 


$8F 


REM 


144 


$90 


STOP 


145 


$91 


ON 


146 


$92 


WAIT 


147 


$93 


LOAD 


148 


$94 


SAVE 


149 


$95 


VERIFY 


150 


$96 


DEF 


151 


$97 


POKE 


152 


$98 


PRINT* 
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153 


$99 


PRINT 


154 


$9A 


CONT 


155 


$9B 


LIST 


156 


$9C 


CLR 


157 


$9D 


CMD 


158 


$9E 


SYS 


159 


$9F 


OPEN 


160 


$A0 


CLOSE 


161 


$A1 


GET 


162 


$A2 


NEW 


163 


$A3 


TAB( 


164 


$A4 


TO 


165 


$A5 


FN 


166 


$A6 


SPC( 


167 


$A7 


THEN 


168 


$A8 


NOT 


169 


$A9 


STEP 


170 


$AA 


+ 


171 


$AB 


_ 


172 


$AC 


* 


173 


$AD 


/ 


174 


$AE 


A 


175 


$AF 


AND 


176 


$B0 


OR 


177 


$B1 


> 


178 


$B2 


— 


179 


$B3 


< 


180 


$B4 


SGN 


181 


$B5 


INT 


182 


$B6 


ABS 


183 


$B7 


USR 


184 


$B8 


FRE 


185 


$B9 


POS 


186 


$BA 


SQR 


187 


$BB 


RND 


188 


SBC 


LOG 


189 


$BD 


EXP 


190 


$BE 


COS 


191 


$BF 


SIN 


192 


$C0 


TAN 


193 


$C1 


ATN 


194 


$C2 


PEEK 
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195 


$C3 


LEN 


196 


$C4 


STR$ 


197 


$C5 


VAL 


198 


$C6 


ASC 


199 


$CA 


CHR$ 


200 


$C8 


LEFTS 


201 


$C9 


RIGHTS 


202 


$CA 


MID$ 


203 


$CB 


GO 


204 


$CC 


RGR 


205 


$CD 


RCLR 


206 


$CE 


RLUM 


207 


$CF 


JOY 


208 


$D0 


RDOT 


209 


$D1 


DEC 


210 


$D2 


HEXS 


211 


$D3 


ERRS 


212 


$D4 


INSTR 


213 


$D5 


ELSE 


214 


$D6 


RESUME 


215 


$D7 


TRAP 


216 


$D8 


TRON 


217 


$D9 


TROFF 


218 


$DA 


SOUND 


219 


$DB 


VOL 


220 


$DC 


AUTO 


221 


$DD 


PUDEF 


222 


$DE 


GRAPHIC 


223 


$DF 


PAINT 


224 


$E0 


CHAR 


225 


$E1 


BOX 


226 


$E2 


CIRCLE 


227 


$E3 


GSHAPE 


228 


$E4 


SSHAPE 


229 


$E5 


DRAW 


230 


$E6 


LOCATE 


231 


$E7 


COLOR 


232 


$E8 


SCNCLR 


233 


$E9 


SCALE 


234 


$EA 


HELP 


235 


$EB 


DO 


236 


$EC 


LOOP 
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237 


$ED 


EXIT 


238 


SEE 


DIRECTORY 


239 


$EF 


DSAVE 


240 


$F0 


DLOAD 


241 


$F1 


HEADER 


242 


$F2 


SCRATCH 


243 


$F3 


COLLECT 


244 


$F4 


COPY 


245 


$F5 


RENAME 


246 


$F6 


BACKUP 


247 


$F7 


DELETE 


248 


$F8 


RENUMBER 


249 


$F9 


KEY 


250 


$FA 


MONITOR 


251 


$FB 


USING 


252 


$FC 


UNTIL 


253 


$FD 


WHILE 


254 
255 


$FE 

$FF 


NOT USED 
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The book contains all the essential information that you need to 
know when using your Plus 4 and CIS, All the important aspects 
trre explained in detail, the items already covered inthemanual 
received with the computers have bean omitied. 
The graphics and machine language are specially stressed and 
demonstrated with example programme*. 

Graphics 

• (Jrephiic possibilities of built in video chip TED. 

• High- Re 5, multicolour and extended colour mode in machine 
code and basic 

• Programming the raster interrupt. 

Sound 

• Music with basic cpmmand- 

• Sound programming of TED in machine code. 

• Interrupt control of music. 

Machine Code 

• Introduction course, 

• Tips ccr.d Tricks for Beginners 

• Commands of 7501 Micro Processor. 

% Introduction for using KERNAL routine*. 

Useful Drta 

• Detailed memory map with exact description of each 
peak/poke, 

• Large comparison chart of CBMG4 and C1G for easy con- 



version. 
Utilities. 
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